diff options
| -rw-r--r-- | perl-install/standalone/drakhelp | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/standalone/drakhelp b/perl-install/standalone/drakhelp index 39c3255f6..dde416209 100644 --- a/perl-install/standalone/drakhelp +++ b/perl-install/standalone/drakhelp @@ -1,5 +1,7 @@ #!/usr/bin/perl +use strict; +use diagnostics; use lib qw(/usr/lib/libDrakX); use standalone; #- warning, standalone must be loaded very first, for 'explanations' @@ -9,6 +11,8 @@ use common; use lang; use any; +die "Usage: drakhelp <help_path>" if @ARGV != 1; + my $in = interactive->vnew; my $lang = lang::lang2LANG(lang::read('',$>)) || 'en'; |