summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/NEWS2
-rw-r--r--perl-install/install/steps_gtk.pm3
2 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 3d4f9a3e5..1010c5845 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,5 @@
+- force use of int64 for installed package size on i586 (mga#19895)
+
Version 17.62 - 1 December 2016
- left background for Mageia 6 sta2
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm
index 658954369..f3ae0a705 100644
--- a/perl-install/install/steps_gtk.pm
+++ b/perl-install/install/steps_gtk.pm
@@ -4,6 +4,7 @@ use diagnostics;
use strict;
use feature 'state';
use vars qw(@ISA);
+use Math::Int64 ':native_if_available', 'int64';
@ISA = qw(install::steps_interactive interactive::gtk);
@@ -626,7 +627,7 @@ sub installPackages {
if ($type eq 'user' && $subtype eq 'install') {
#- $amount and $total are used to return number of package and total size.
$nb = $amount;
- $total_size = $total; $current_total_size = 0;
+ $total_size = $total; $current_total_size = int64(0);
$o->{install_start_time} = 0;
mygtk3::gtkadd($pkg_log_widget, text => P("%d package", "%d packages", $nb, $nb));
$w->flush;