From 8181c02c47ec4ad9c828a808afc28ba8b94a6250 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Thu, 8 May 2008 04:59:00 +0000
Subject: - handle gracefully locked RPM DB when trying to install some
 packages   (#40244)

---
 Rpmdrake/pkg.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'Rpmdrake')

diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index d4e83895..66d02607 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -374,7 +374,12 @@ sub get_pkgs {
     $gurpm->label(N("Please wait, listing base packages..."));
     $gurpm->progress($level);
     
-    my $db = open_rpm_db();
+    my $db = eval { open_rpm_db() };
+    if (my $err = $@) {
+	interactive_msg(N("Error"), N("A fatal error occurred: %s.", $err));
+        return;
+    }
+
     my $sig_handler = sub { undef $db; exit 3 };
     local $SIG{INT} = $sig_handler;
     local $SIG{QUIT} = $sig_handler;
-- 
cgit v1.2.1