Parent Directory | Revision Log | Patch
revision 342 by dpavlin, Tue Mar 7 10:17:56 2006 UTC | revision 343 by dpavlin, Tue Mar 7 10:24:26 2006 UTC | |
---|---|---|
# | Line 43 if ( $err ) { | Line 43 if ( $err ) { |
43 | ||
44 | my $TopDir = $bpc->TopDir(); | my $TopDir = $bpc->TopDir(); |
45 | ||
46 | print Dumper(\%Conf); | #print Dumper(\%Conf); |
47 | ||
48 | # check if host exists | # check if host exists |
49 | ||
50 | die "host $host is not found" unless ($bpc->HostInfoRead( $host )); | my $host_info = $bpc->HostInfoRead( $host ); |
51 | #print Dumper($host_info, $bpc->HostInfoRead( 'localhost' )); | |
52 | die "host '$host' is not found\n" unless ($host_info->{$host}); | |
53 | ||
54 | # create restore host configuration | # create restore host configuration |
55 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |