summaryrefslogtreecommitdiffstats
path: root/mdkonline
diff options
context:
space:
mode:
Diffstat (limited to 'mdkonline')
-rwxr-xr-xmdkonline22
1 files changed, 21 insertions, 1 deletions
diff --git a/mdkonline b/mdkonline
index ff4a8291..2e5581d0 100755
--- a/mdkonline
+++ b/mdkonline
@@ -49,7 +49,27 @@ my @info;
$ia = 1;
-GetOptions('interactive!' => \$ia, 'login=s' => \$login, 'pass=s' => \$password, 'box=s' => \$boxname, 'country:s' => \$country);
+
+sub usage() {
+ print STDERR N("mdonline version %s
+Copyright (C) %s Mandriva.
+This is free software and may be redistributed under the terms of the GNU GPL.
+
+usage:
+", 1, 2006) . N(" --help - print this help message.
+") . N(" --box= - hostname.
+") . N(" --country - name of country of the user.
+") . N(" --interactive - use the interactive mode.
+") . N(" --nointeractive - use the non-interactive mode.
+") . N(" --login= - login name of the user.
+") . N(" --pass= - password of the user.
+");
+ exit(0);
+}
+
+GetOptions('interactive!' => \$ia, 'login=s' => \$login, 'pass=s' => \$password, 'box=s' => \$boxname, 'country:s' => \$country,
+ 'help' => \&usage,
+ );
my $in = interactive->vnew('su') if $ia;