aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAngelo Naselli <anaselli@mageia.org>2012-11-06 13:28:57 +0000
committerAngelo Naselli <anaselli@mageia.org>2012-11-06 13:28:57 +0000
commit5a38703a90989bca6a3e2c858c3f9467895316f9 (patch)
tree6748e9227961f7d5e06d87ae9835718fe10ee4e9
parent3a1c2a678967d3826e400b6d14961670d423aca4 (diff)
downloadmanatools-5a38703a90989bca6a3e2c858c3f9467895316f9.tar
manatools-5a38703a90989bca6a3e2c858c3f9467895316f9.tar.gz
manatools-5a38703a90989bca6a3e2c858c3f9467895316f9.tar.bz2
manatools-5a38703a90989bca6a3e2c858c3f9467895316f9.tar.xz
manatools-5a38703a90989bca6a3e2c858c3f9467895316f9.zip
using yui::YCommandLine only for all, at the moment
-rwxr-xr-xapanel.pl11
1 files changed, 6 insertions, 5 deletions
diff --git a/apanel.pl b/apanel.pl
index 6e50f2cb..d1c5c1ec 100755
--- a/apanel.pl
+++ b/apanel.pl
@@ -22,16 +22,13 @@ use warnings;
use diagnostics;
use FindBin;
use lib "$FindBin::RealBin";
-use Getopt::Long;
use Auth;
use MainDisplay;
use yui;
-my $help=0;
+my $cmdline = new yui::YCommandLine;
-my $result = GetOptions ("help" => \$help);
-
-usage() if($help);
+usage() if($cmdline->find("--help") > 0 || $cmdline->find("-h") > 0);
ask_for_authentication() if(require_root_capability());
@@ -61,6 +58,10 @@ sub usage {
print "Usage apanel [options...]\n\n";
print "Options:\n";
print "\t--help | -h print this help\n";
+## anaselli: --name now is used only to add a path to /etc (e.g. --name mcc2 means /etc/mcc2)
+ # and it is overriden by --conf_dir, so it should be discussed better to understand
+ # if it is really needed any more.
+ # Window title is got from settings.conf (key title)
print "\t--name string specify the window title of the administration panel\n";
print "\t--conf_dir path specify the settings.conf file directory\n";
print "\n";