diff options
| -rwxr-xr-x | perl-install/standalone/diskdrake | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/diskdrake b/perl-install/standalone/diskdrake index 38bb4e577..a9966f804 100755 --- a/perl-install/standalone/diskdrake +++ b/perl-install/standalone/diskdrake @@ -54,7 +54,7 @@ foreach (@types) { last; } } -%options and die "usage: diskdrake [--expert] [--testing] [--{" . join(",", @types) . "}]\n"; +keys %options and die "usage: diskdrake [--expert] [--testing] [--{" . join(",", @types) . "}]\n"; if ($>) { $ENV{PATH} = "/sbin:/usr/sbin:$ENV{PATH}"; |