diff options
| author | Pascal Terjan <pterjan@gmail.com> | 2016-12-07 23:54:48 +0000 |
|---|---|---|
| committer | Pascal Terjan <pterjan@gmail.com> | 2016-12-07 23:54:48 +0000 |
| commit | ef6c9a6c0134c051c46d711e3f314e97ac12fba4 (patch) | |
| tree | e9c93cad02b48146208ef296358acc0d9325567a /perl-install | |
| parent | d043433cefb6a98b2e039972f90398e9edd5d074 (diff) | |
| download | drakx-ef6c9a6c0134c051c46d711e3f314e97ac12fba4.tar drakx-ef6c9a6c0134c051c46d711e3f314e97ac12fba4.tar.gz drakx-ef6c9a6c0134c051c46d711e3f314e97ac12fba4.tar.bz2 drakx-ef6c9a6c0134c051c46d711e3f314e97ac12fba4.tar.xz drakx-ef6c9a6c0134c051c46d711e3f314e97ac12fba4.zip | |
Force use of int64 for installed package size on i586 (mga#19895)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install/NEWS | 2 | ||||
| -rw-r--r-- | perl-install/install/steps_gtk.pm | 3 |
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; |