r23654 - /scripts/KGB/server/KGB

dmn at users.alioth.debian.org dmn at users.alioth.debian.org
Mon Jul 28 12:22:25 UTC 2008


Author: dmn
Date: Mon Jul 28 12:22:22 2008
New Revision: 23654

URL: http://svn.debian.org/wsvn/?sc=1&rev=23654
Log:
server: add --config command-line option

Modified:
    scripts/KGB/server/KGB

Modified: scripts/KGB/server/KGB
URL: http://svn.debian.org/wsvn/scripts/KGB/server/KGB?rev=23654&op=diff
==============================================================================
--- scripts/KGB/server/KGB (original)
+++ scripts/KGB/server/KGB Mon Jul 28 12:22:22 2008
@@ -33,7 +33,14 @@
 use Digest::SHA1 qw(sha1_hex);
 use Proc::PID::File;
 
-my $conf = YAML::LoadFile("kgb.conf") or die "Error loading config";
+my $conf_file = '/etc/kgb/kgb.conf';
+GetOptions(
+    'config=s'  => \$conf_file,
+) or die 'Invalid parameters';
+
+ at ARGV and die "No command line arguments supported\n";
+
+my $conf = YAML::LoadFile($conf_file) or die "Error loading config from $conf_file\n";
 
 die "Invalid config key: soap" unless(ref $conf->{soap}
         and ref $conf->{soap} eq "HASH"); 




More information about the Pkg-perl-cvs-commits mailing list