summaryrefslogtreecommitdiffstats
path: root/urpm/args.pm
diff options
context:
space:
mode:
Diffstat (limited to 'urpm/args.pm')
-rw-r--r--urpm/args.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/urpm/args.pm b/urpm/args.pm
index 7118635e..cfb7cff4 100644
--- a/urpm/args.pm
+++ b/urpm/args.pm
@@ -396,7 +396,7 @@ sub parse_cmdline {
for my $k (keys %{$args{defaults} || {}}) {
$options{$k} = $args{defaults}{$k};
}
- GetOptions(%{$options_spec{$tool}});
+ my $ret = GetOptions(%{$options_spec{$tool}});
if ($tool eq 'urpmf' && @ARGV && $ARGV[0] eq '--') {
if (@ARGV == 2) {
my $p = $ARGV[1];
@@ -406,11 +406,13 @@ sub parse_cmdline {
$p =~ s/\+/\\+/g;
}
$::expr .= "m{$p}" . $::pattern;
+ $ret = 1;
}
else {
die N("Too many arguments\n");
}
}
+ $ret
}
1;