diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2006-05-16 12:12:20 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2006-05-16 12:12:20 +0000 |
commit | de98e7e7e1bcccf2c16461d4231e8ccc660092e8 (patch) | |
tree | b609f6c2d6924fdcb3821a79fc5359ecfb3cd64a | |
parent | b92fb7c525daa8d9d9f793ec0f428eca6d500c5c (diff) | |
download | rpmdrake-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
-rw-r--r-- | rpmdrake.pm | 5 |
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; |