summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-09-28 00:38:31 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-09-28 00:38:31 +0000
commita2684a39b0328d328fb5fc15443b34f229405583 (patch)
tree90b4c93e38a7c75d664f2651c1a8c86f23540265 /perl-install/install_steps_gtk.pm
parentded1296850850b73f27a33eb0259aa6df70a04f1 (diff)
downloaddrakx-a2684a39b0328d328fb5fc15443b34f229405583.tar
drakx-a2684a39b0328d328fb5fc15443b34f229405583.tar.gz
drakx-a2684a39b0328d328fb5fc15443b34f229405583.tar.bz2
drakx-a2684a39b0328d328fb5fc15443b34f229405583.tar.xz
drakx-a2684a39b0328d328fb5fc15443b34f229405583.zip
no_comment
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
-rw-r--r--perl-install/install_steps_gtk.pm9
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;