From 2fec2aafb9ddd58d1bfdd1e819e045d2f4634891 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Thu, 22 Mar 2007 14:52:58 +0000
Subject: (callback_choices) do not return random package when user canceled
 the dialog

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

diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index a986d894..64b1e604 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -474,7 +474,7 @@ sub callback_choices {
     my @choices = interactive_list_(N("Please choose"), (scalar(@$choices) == 1 ? 
     N("The following package is needed:") : N("One of the following packages is needed:")),
                                     [ map { urpm_name($_) } @$choices ], $callback);
-    $choices->[$choices[0]];
+    $choices[0] ? $choices->[$choices[0]] : undef;
 }
 
 sub toggle_nodes {
-- 
cgit v1.2.1