summaryrefslogtreecommitdiffstats
path: root/perl-install/common.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-07-25 12:37:12 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-07-25 12:37:12 +0000
commit552311036c4a595018037031f7d335c97c8ba83b (patch)
treeaee19e9655e37d79a59747f18377b8403e841f2b /perl-install/common.pm
parent01e5d9dc8a337b512b49ac66de2ac6cd3b97a288 (diff)
downloaddrakx-backup-do-not-use-552311036c4a595018037031f7d335c97c8ba83b.tar
drakx-backup-do-not-use-552311036c4a595018037031f7d335c97c8ba83b.tar.gz
drakx-backup-do-not-use-552311036c4a595018037031f7d335c97c8ba83b.tar.bz2
drakx-backup-do-not-use-552311036c4a595018037031f7d335c97c8ba83b.tar.xz
drakx-backup-do-not-use-552311036c4a595018037031f7d335c97c8ba83b.zip
(removeXiBSuffix): add TB (tera)
Diffstat (limited to 'perl-install/common.pm')
-rw-r--r--perl-install/common.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm
index c33b59878..50da27856 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -93,6 +93,7 @@ sub removeXiBSuffix {
/(\d+)\s*kB?$/i and return $1 * 1024;
/(\d+)\s*MB?$/i and return $1 * 1024 * 1024;
/(\d+)\s*GB?$/i and return $1 * 1024 * 1024 * 1024;
+ /(\d+)\s*TB?$/i and return $1 * 1024 * 1024 * 1024 * 1024;
$_;
}
sub formatXiB {