Subversion Repositories sysadmin_scripts

Rev

Rev 108 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 108 Rev 109
Line 455... Line 455...
455 
#print Dumper( $config ); die;
 455 
#print Dumper( $config ); die;
456 
foreach my $account ( keys %{$config->{'accounts'}} ) {
 456 
foreach my $account ( keys %{$config->{'accounts'}} ) {
457 
    $config->{'accounts'}->{$account} = &fixupAccount( $config->{'default'}, $config->{'accounts'}->{$account} );
 457 
    $config->{'accounts'}->{$account} = &fixupAccount( $config->{'default'}, $config->{'accounts'}->{$account} );
458 
}
 458 
}
459 
 
 459 
 
460 
print Dumper( $config ) ; die;
 460 
#print Dumper( $config ) ; die;
461 
 
 461 
 
462 
# just a place to gather some stats
 462 
# just a place to gather some stats
463 
my %processed;
 463 
my %processed;
464 
$processed{'Accounts'} = 0;
 464 
$processed{'Accounts'} = 0;
465 
$processed{'Messages'} = 0;
 465 
$processed{'Messages'} = 0;