summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>1999-11-03 00:47:28 +0000
committerPascal Rigaux <pixel@mandriva.com>1999-11-03 00:47:28 +0000
commitb58392362e2ddf85271dae90c15d48215921d224 (patch)
tree76f7bbd93c4b0f893e9316ccb7cc78158facca9e /perl-install/my_gtk.pm
parent9176797a41f4acb22259ffa0b7e58d49b1bceac3 (diff)
downloaddrakx-b58392362e2ddf85271dae90c15d48215921d224.tar
drakx-b58392362e2ddf85271dae90c15d48215921d224.tar.gz
drakx-b58392362e2ddf85271dae90c15d48215921d224.tar.bz2
drakx-b58392362e2ddf85271dae90c15d48215921d224.tar.xz
drakx-b58392362e2ddf85271dae90c15d48215921d224.zip
no_comment
Diffstat (limited to 'perl-install/my_gtk.pm')
-rw-r--r--perl-install/my_gtk.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index 12f0e6eb7..5dcd9b4da 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -462,6 +462,7 @@ sub _ask_from_list {
$list->moveto($_[0], 0, 0.5, 0);
};
+ $list->signal_connect(button_release_event => $leave) if ref $title && !@okcancel;
$list->signal_connect(select_row => sub {
my ($w, $row, undef, $e) = @_;
$curr = $row;