From 1df0880ba80ae653b29cc524defe4d632c741a6a Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Wed, 21 Mar 2007 11:54:09 +0000
Subject: (do_action) add support for 'cancel_perform' exception

---
 Rpmdrake/gui.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index d42602db..fe3333df 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -670,7 +670,8 @@ Do you really want to install all the selected packages?"), yesno => 1)
 sub do_action {
     my ($options, $callback_action, $o_info) = @_;
     my $res = eval { do_action__real($options, $callback_action, $o_info) };
-    if (my $err = $@) {
+    my $err = $@;
+    if ($err && $err !~ /cancel_perform/) {
         interactive_msg(N("Fatal error"),
                         N("A fatal error occurred: %s.", $err));
     }
-- 
cgit v1.2.1