Parent Directory | Revision Log | Patch
revision 1041 by dpavlin, Mon Nov 12 12:22:08 2007 UTC | revision 1043 by dpavlin, Mon Nov 12 12:35:32 2007 UTC | |
---|---|---|
# | Line 153 pod2usage(-verbose => 2) if ($help); | Line 153 pod2usage(-verbose => 2) if ($help); |
153 | ||
154 | my $config = new WebPAC::Config( path => $config_path ); | my $config = new WebPAC::Config( path => $config_path ); |
155 | ||
156 | WebPAC::Normalize::_debug( $debug - 1 ) if $debug > 1; | |
157 | ||
158 | #print "config = ",dump($config) if ($debug); | #print "config = ",dump($config) if ($debug); |
159 | ||
160 | die "no databases in config file!\n" unless ($config->databases); | die "no databases in config file!\n" unless ($config->databases); |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |