From 804ac30484ab969645dc4a086fa3bed42f862a3d Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Tue, 20 Aug 2002 13:58:20 +0000
Subject: fix when there was errors

---
 grpmi/grpmi.pl | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'grpmi')

diff --git a/grpmi/grpmi.pl b/grpmi/grpmi.pl
index f7f8bd92..3fc14ef6 100755
--- a/grpmi/grpmi.pl
+++ b/grpmi/grpmi.pl
@@ -164,10 +164,12 @@ Do you want to force the install anyway?",
     }
     
     my $res = chomp_(grpmi_rpm::install_packages(\&install_packages_callback, @ARGV));
-    $res and interactive_msg(_("Problems occurred during installation"), _("There was an error during packages installation:\n\n%s", $res));
+    if ($res) {
+	interactive_msg(_("Problems occurred during installation"), _("There was an error during packages installation:\n\n%s", $res));
+	goto cleanup;
+    }
 }
 
-
 # -=-=-=---=-=-=---=-=-=-- cleanup -=-=-=---=-=-=--
 $exitstatus = 0;
 interactive_msg(_("Everything installed successfully"), _("All requested packages were installed successfully."));
-- 
cgit v1.2.1