aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xRpmdrake/init.pm7
1 files changed, 7 insertions, 0 deletions
diff --git a/Rpmdrake/init.pm b/Rpmdrake/init.pm
index d01c36a4..98c3db64 100755
--- a/Rpmdrake/init.pm
+++ b/Rpmdrake/init.pm
@@ -98,6 +98,13 @@ foreach (@ARGV) {
}
}
+foreach my $option (qw(media mode parallel pkg-nosel pkg-sel search)) {
+ if (defined $options{$option} && !ref($options{$option})) {
+ warn "wrong usage of \"$option\" option!\n";
+ exit(-1); # too early for my_exit()
+ }
+}
+
our $MODE = ref $options{mode} ? $options{mode}[0] : undef;
unless ($MODE) {
$MODE = 'install';