diff options
-rw-r--r-- | perl-install/my_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm index 75f80f476..6eef0d50f 100644 --- a/perl-install/my_gtk.pm +++ b/perl-install/my_gtk.pm @@ -569,7 +569,7 @@ sub gtkicons_labels_widget { my $fixed = new Gtk::Fixed; foreach (@tab) { $fixed->put($_, 75, 65) } my $redraw_function = sub { - $fixed->move(@$_) foreach compute_icons($fixed->allocation->[2], $fixed->allocation->[3], 40, 15, 10, @tab); + $fixed->move(@$_) foreach compute_icons($fixed->allocation->[2], $fixed->allocation->[3], 40, 15, 20, @tab); }; $fixed->signal_connect(expose_event => $redraw_function ); $fixed->signal_connect(realize => sub { |