diff options
author | Angelo Naselli <anaselli@mageia.org> | 2012-11-06 20:15:01 +0000 |
---|---|---|
committer | Angelo Naselli <anaselli@mageia.org> | 2012-11-06 20:15:01 +0000 |
commit | 5a547e6b955ea5c655edb3b87b7ff7676ced36fe (patch) | |
tree | 6e3b659c3cc210c6553cdcc4952cb38c6ee1061e /apanel.pl | |
parent | 5a38703a90989bca6a3e2c858c3f9467895316f9 (diff) | |
download | manatools-5a547e6b955ea5c655edb3b87b7ff7676ced36fe.tar manatools-5a547e6b955ea5c655edb3b87b7ff7676ced36fe.tar.gz manatools-5a547e6b955ea5c655edb3b87b7ff7676ced36fe.tar.bz2 manatools-5a547e6b955ea5c655edb3b87b7ff7676ced36fe.tar.xz manatools-5a547e6b955ea5c655edb3b87b7ff7676ced36fe.zip |
change code alignment using
tabstop=4 shiftwidth=4 expandtab
Diffstat (limited to 'apanel.pl')
-rwxr-xr-x | apanel.pl | 30 |
1 files changed, 14 insertions, 16 deletions
@@ -1,5 +1,5 @@ #!/usr/bin/perl - +# vim: set et ts=4 sw=4: # Copyright 2012 Steven Tucker # # This file is part of AdminPanel @@ -35,14 +35,12 @@ ask_for_authentication() if(require_root_capability()); my $mainWin = new MainDisplay(); my $launch = $mainWin->start(); -while($launch) -{ +while ($launch) { $mainWin->destroy(); undef($mainWin); my $err = yui::YUI::app()->runInTerminal("$launch --ncurses"); - if ($err == -1) - { + if ($err == -1) { system($launch); } @@ -54,18 +52,18 @@ $mainWin->destroy(); undef($mainWin); sub usage { - print "\n"; - print "Usage apanel [options...]\n\n"; - print "Options:\n"; - print "\t--help | -h print this help\n"; + print "\n"; + 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"; - exit(0); + # 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"; + exit(0); } =pod |