summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-09-24 15:26:41 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-09-24 15:26:41 +0000
commitb6917c3670993c4520ce84112e07b0ea7cecd10b (patch)
tree88a938052dfdef780d6734035db25a1f20fcbfee
parente939764c1c13713245b9ef169e02dfda5487c4e7 (diff)
downloaddrakx-backup-do-not-use-b6917c3670993c4520ce84112e07b0ea7cecd10b.tar
drakx-backup-do-not-use-b6917c3670993c4520ce84112e07b0ea7cecd10b.tar.gz
drakx-backup-do-not-use-b6917c3670993c4520ce84112e07b0ea7cecd10b.tar.bz2
drakx-backup-do-not-use-b6917c3670993c4520ce84112e07b0ea7cecd10b.tar.xz
drakx-backup-do-not-use-b6917c3670993c4520ce84112e07b0ea7cecd10b.zip
dams fix enable to get rid of the infamous ugly gtk timeout
-rw-r--r--perl-install/ugtk.pm12
1 files changed, 0 insertions, 12 deletions
diff --git a/perl-install/ugtk.pm b/perl-install/ugtk.pm
index f324ca0c6..dd1095a05 100644
--- a/perl-install/ugtk.pm
+++ b/perl-install/ugtk.pm
@@ -603,21 +603,9 @@ sub gtkicons_labels_widget {
}
my $fixed = new Gtk::Fixed;
foreach (@tab) { $fixed->put($_, 75, 65) }
- my $is_resized = 0;
my $w_ret = createScrolledWindow($fixed, undef, 'none');
my $redraw_function;
$redraw_function = sub {
- if ($is_resized == 0) {
- if (3 < $#args) {
- #- Ugly hacks, don't touch! ########
- my $timeout1 = Gtk->timeout_add(100, sub {
- $fixed->set_usize($w_ret->allocation->[2] - 22, 0);
- &$redraw_function;
- 0
- });
- }
- $is_resized = 1;
- }
$fixed->move(@$_) foreach compute_icons($fixed->allocation->[2]-22, $fixed->allocation->[3], 40, 15, 20, @tab);
};
$fixed->signal_connect(expose_event => $redraw_function);