X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lib%2Fperl%2FConfig.pm;h=d145495cb25a4c21c0d5b02b2057b68918ef8818;hb=d9e3b9f0bdd257d6287c5ba32cab5f648a98ed55;hp=aa62b9a90081ba06ea36f4040598271415307252;hpb=c1d7055ed3ee447b02c7e430e0512e1aab5f6676;p=libucw.git

diff --git a/lib/perl/Config.pm b/lib/perl/Config.pm
index aa62b9a9..d145495c 100644
--- a/lib/perl/Config.pm
+++ b/lib/perl/Config.pm
@@ -14,6 +14,9 @@ use Getopt::Long;
 our %Sections = ();
 
 our $DefaultConfigFile = "";
+our $Usage = "-C, --config filename   Override the default configuration file
+-S, --set sec.item=val  Manual setting of a configuration item";
+
 
 sub Parse(@) {
 	my @options = @_;