summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@gmail.com>2016-12-14 00:08:28 +0000
committerPascal Terjan <pterjan@gmail.com>2016-12-14 00:08:28 +0000
commit093ddd80b2a9a830a95363a29ce30663f42413d6 (patch)
tree85d2a4f193f7b89d4d492e0b0ead4e642ce3190f /perl-install
parentd6b9de2d5c0d748a35287dae11950afbdb848b55 (diff)
downloaddrakx-093ddd80b2a9a830a95363a29ce30663f42413d6.tar
drakx-093ddd80b2a9a830a95363a29ce30663f42413d6.tar.gz
drakx-093ddd80b2a9a830a95363a29ce30663f42413d6.tar.bz2
drakx-093ddd80b2a9a830a95363a29ce30663f42413d6.tar.xz
drakx-093ddd80b2a9a830a95363a29ce30663f42413d6.zip
Fix accidental part fo previous commit
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/pkgs.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm
index cc2fc4d00..6602acf90 100644
--- a/perl-install/install/pkgs.pm
+++ b/perl-install/install/pkgs.pm
@@ -74,7 +74,7 @@ sub size2time {
my $A = 7e9;
my $limit = min($max * 3 / 4, 9e8);
if ($x < $limit) {
- $A * int64_to_number($x);
+ $A * $x;
} else {
$x -= $limit;
my $B = 6;