From d3c77792d4458c82943d4819e6080344151653a1 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 2 Feb 2001 14:02:25 +0000 Subject: using the new formatXiB --- perl-install/partition_table_raw.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/partition_table_raw.pm') diff --git a/perl-install/partition_table_raw.pm b/perl-install/partition_table_raw.pm index aca8a114a..edf0f0918 100644 --- a/perl-install/partition_table_raw.pm +++ b/perl-install/partition_table_raw.pm @@ -96,10 +96,10 @@ sub description { my ($hd) = @_; my $win = $hd->{device_windobe}; - sprintf "%s%s (%d%s%s)", + sprintf "%s%s (%s%s)", $hd->{device}, $win && " [$win:]", - ($hd->{totalsectors} || $hd->{size}) >> 11, _("MB"), + formatXiB($hd->{totalsectors} || $hd->{size}, 512), $hd->{info} && ", $hd->{info}"; } -- cgit v1.2.1