summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
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;