From 1d648c332e21d8fac81b0fc442ffbaac27638902 Mon Sep 17 00:00:00 2001
From: Olivier Thauvin <nanardon@mandriva.org>
Date: Sun, 11 Jun 2006 18:31:06 +0000
Subject: - fix r36644, ensure urpm::args::parse_cmdline() return true if there
 is no error

---
 urpm/args.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'urpm/args.pm')

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;
-- 
cgit v1.2.1