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.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index 6cf1e1af6..43ee42903 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -385,7 +385,7 @@ sub _ask_from_list($$$$) {
gtkpack($o->create_box_with_title(@$messages),
@$l > 15 ? gtkset_usize(createScrolledWindow($list), 200, 280) : $list));
- $o->flush; # otherwise the moveto is not done
+ $o->sync; # otherwise the moveto is not done
map_index {
$list->append($_);
&$select($::i) if $def && $_ eq $def;