From fe1fff1dc82d008a6b811513a1809f379ea5a0b9 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Tue, 16 Jun 2015 06:52:26 +0200
Subject: better understandable percentage (mga#16116)

as a side note, this is friendler to translators (instead of joining
two strings...)
---
 perl-install/diskdrake/interactive.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index f13659ac1..f772c0f8b 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -1395,8 +1395,11 @@ sub format_part_info {
 	$info .= N("Type: ") . (fs::type::part2type_name($part) || $part->{fs_type}) . ($::expert ? sprintf " (0x%x)", $part->{pt_type} : '') . "\n";
     }
     $info .= N("Start: sector %s\n", $part->{start}) if $::expert && !isSpecial($part) && !isLVM($hd);
-    $info .= N("Size: %s", formatXiB($part->{size}, 512));
-    $info .= sprintf " (%s%%)", int 100 * $part->{size} / $hd->{totalsectors} if $hd->{totalsectors};
+    if ($hd->{totalsectors}) {
+	$info .= N("Size: %s (%s%% of disk)", formatXiB($part->{size}, 512), int 100 * $part->{size} / $hd->{totalsectors});
+    } else {
+	$info .= N("Size: %s", formatXiB($part->{size}, 512));
+    }
     $info .= N(", %s sectors", $part->{size}) if $::expert;
     $info .= "\n";
     $info .= N("Cylinder %d to %d\n", $part->{start} / $hd->cylinder_size, ($part->{start} + $part->{size} - 1) / $hd->cylinder_size) if ($::expert || isEmpty($part)) && !isSpecial($part) && !isLVM($hd) && $hd->cylinder_size;
-- 
cgit v1.2.1