aboutsummaryrefslogtreecommitdiffstats
path: root/rpmdrake.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2006-05-16 12:12:20 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2006-05-16 12:12:20 +0000
commitde98e7e7e1bcccf2c16461d4231e8ccc660092e8 (patch)
treeb609f6c2d6924fdcb3821a79fc5359ecfb3cd64a /rpmdrake.pm
parentb92fb7c525daa8d9d9f793ec0f428eca6d500c5c (diff)
downloadrpmdrake-de98e7e7e1bcccf2c16461d4231e8ccc660092e8.tar
rpmdrake-de98e7e7e1bcccf2c16461d4231e8ccc660092e8.tar.gz
rpmdrake-de98e7e7e1bcccf2c16461d4231e8ccc660092e8.tar.bz2
rpmdrake-de98e7e7e1bcccf2c16461d4231e8ccc660092e8.tar.xz
rpmdrake-de98e7e7e1bcccf2c16461d4231e8ccc660092e8.zip
(interactive_list) enable one to cancel selecting packages if he
believes it ended in selecting way too much packages
Diffstat (limited to 'rpmdrake.pm')
-rw-r--r--rpmdrake.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/rpmdrake.pm b/rpmdrake.pm
index 3c31340d..bf837af1 100644
--- a/rpmdrake.pm
+++ b/rpmdrake.pm
@@ -274,7 +274,10 @@ sub interactive_list {
Gtk2::Label->new($contents),
int(@$list) > 8 ? gtkset_size_request(create_scrolled_window($vbradios), 250, 320) : $vbradios,
gtkpack__(
- create_hbox(), gtksignal_connect(
+ create_hbox(),
+ gtksignal_connect(
+ Gtk2::Button->new(N("Cancel")), clicked => sub { Gtk2->main_quit }),
+ gtksignal_connect(
Gtk2::Button->new(N("Ok")), clicked => sub {
each_index { $_->get_active and $choice = $::i } @radios;
Gtk2->main_quit;