From 170345ed730ff801de7a3230a3727fcb70383ffa Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Wed, 11 Dec 2002 11:27:17 +0000
Subject: 4.1-12mdk

---
 urpme | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'urpme')

diff --git a/urpme b/urpme
index a5a58a78..8442e4a7 100644
--- a/urpme
+++ b/urpme
@@ -193,7 +193,11 @@ if (@toremove > @l && !$auto) {
     <STDIN> =~ /[$noexpr]/ and exit 0;
 }
 
-$urpm->install(\@toremove, {}, {});
+@l = $urpm->install(\@toremove, {}, {});
+if (@l) {
+    print STDERR _("Removing failed") . ":\n" . join("\n",  map { "\t$_" } @l);
+    exit 1;
+}
 
 sub toMb {
     my $nb = $_[0] / 1024 / 1024;
-- 
cgit v1.2.1