diff options
author | Francois Pons <fpons@mandriva.com> | 2001-01-18 14:02:39 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 2001-01-18 14:02:39 +0000 |
commit | 8be33442197d3e14066399b312e41c47ef99341b (patch) | |
tree | 11e6b4cbddb9c880171cac5bfa87c5f53f90bf47 /perl-install | |
parent | d5398d16525faf667da6bafb153cfff0f6189428 (diff) | |
download | drakx-8be33442197d3e14066399b312e41c47ef99341b.tar drakx-8be33442197d3e14066399b312e41c47ef99341b.tar.gz drakx-8be33442197d3e14066399b312e41c47ef99341b.tar.bz2 drakx-8be33442197d3e14066399b312e41c47ef99341b.tar.xz drakx-8be33442197d3e14066399b312e41c47ef99341b.zip |
make sure no ratio above 1 can occur, still need to see why as it happens
on install-abort-choices-install or
install-abort-choices-fs-format(none)-choices-install
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 332ec88ea..e9cafd60c 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -510,7 +510,7 @@ sub installPackages { $progress->update($_[2] ? $_[1] / $_[2] : 0); my $dtime = time() - $start_time; - my $ratio = $total_size ? ($_[1] + $current_total_size) / $total_size : 0; + my $ratio = $total_size ? ($_[1] + $current_total_size) / $total_size : 0; $ratio >= 1 and $ratio = 1; my $total_time = $ratio ? $dtime / $ratio : time(); $progress_total->update($ratio); |