summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive_gtk.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/interactive_gtk.pm')
-rw-r--r--perl-install/interactive_gtk.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm
index 0403b188a..12ff75ac4 100644
--- a/perl-install/interactive_gtk.pm
+++ b/perl-install/interactive_gtk.pm
@@ -151,6 +151,8 @@ sub ask_from_entries_refW {
my $c = chr $e->{keyval};
if ($c eq "\x8d")
{
+ #don't know why it works, i believe that
+ #i must say before &$go_to_next, but with it doen't work HACK!
$w->signal_emit_stop("key_press_event");
}
;