diff options
| -rw-r--r-- | NEWS | 2 | ||||
| -rw-r--r-- | Rpmdrake/pkg.pm | 7 |
2 files changed, 8 insertions, 1 deletions
@@ -1,3 +1,5 @@ +- handle gracefully locked RPM DB when trying to install some packages + (#40244) - rpmdrake: o fix a crash when default view is unknown (#40025) o fix searching when numeric pad's return key is pressed diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 883113f0..06c88e55 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; |