diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-09-28 00:38:31 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-09-28 00:38:31 +0000 |
commit | a2684a39b0328d328fb5fc15443b34f229405583 (patch) | |
tree | 90b4c93e38a7c75d664f2651c1a8c86f23540265 /perl-install/install_steps_gtk.pm | |
parent | ded1296850850b73f27a33eb0259aa6df70a04f1 (diff) | |
download | drakx-backup-do-not-use-a2684a39b0328d328fb5fc15443b34f229405583.tar drakx-backup-do-not-use-a2684a39b0328d328fb5fc15443b34f229405583.tar.gz drakx-backup-do-not-use-a2684a39b0328d328fb5fc15443b34f229405583.tar.bz2 drakx-backup-do-not-use-a2684a39b0328d328fb5fc15443b34f229405583.tar.xz drakx-backup-do-not-use-a2684a39b0328d328fb5fc15443b34f229405583.zip |
no_comment
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 1281e3a47..2ea992470 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -172,8 +172,9 @@ sub selectMouse { my %old = %{$o->{mouse}}; $o->SUPER::selectMouse($force); my $mouse = $o->{mouse}; - $old{type} eq $mouse->{type} && - $old{name} eq $mouse->{name} && + $mouse->{type} eq 'none' || + $old{type} eq $mouse->{type} && + $old{name} eq $mouse->{name} && $old{device} eq $mouse->{device} && !$force and return; local $my_gtk::grab = 1; #- unsure a crazy mouse don't go wild clicking everywhere @@ -510,8 +511,8 @@ sub installPackages { $progress_total->update($ratio); if ($dtime != $last_dtime && $current_total_size > 10 * 1024 * 1024) { - $msg_time_total->set(formatTime(10 * round($total_time / 10))); - $msg_time_remaining->set(formatTime(10 * round(max($total_time - $dtime, 0) / 10))); + $msg_time_total->set(formatTime(10 * round($total_time / 10) + 10)); + $msg_time_remaining->set(formatTime(10 * round(max($total_time - $dtime, 0) / 10) + 10)); $last_dtime = $dtime; } $w->flush; |