From ea1908ab2c9e4b9eedf1dfbfb0449bc049ecdcb8 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sun, 11 Dec 2016 18:39:05 +0100 Subject: make sure ratio is an int64 (mga#19895) as this is the variable that cause issues --- perl-install/install/steps_gtk.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/install') diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index f3ae0a705..c0658063b 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -655,9 +655,9 @@ sub installPackages { my $dtime = time() - $o->{install_start_time}; my $ratio = - $total_size == 0 ? 0 : + $total_size == 0 ? int64(0) : install::pkgs::size2time($current_total_size + $amount, $total_size) / install::pkgs::size2time($total_size, $total_size); - $ratio >= 1 and $ratio = 1; + $ratio >= 1 and $ratio = int64(1); my $total_time = $ratio ? $dtime / $ratio : time(); gtkval_modify(\$progress_total, $ratio); -- cgit v1.2.1