summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake/interactive.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/diskdrake/interactive.pm')
-rw-r--r--perl-install/diskdrake/interactive.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index df957ae56..dcccc1c97 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -1210,7 +1210,7 @@ sub format_part_info {
$info .= N("RAID %s\n", $part->{raid}) if isPartOfRAID($part);
if (isPartOfLVM($part)) {
$info .= sprintf "LVM %s\n", $part->{lvm};
- $info .= sprintf "Used physical extents %d / %d\n", split(' ', lvm::get_pv_field($part, 'pv_pe_alloc_count,pv_pe_count'));
+ $info .= sprintf "Used physical extents %d / %d\n", lvm::pv_physical_extents($part);
}
$info .= N("Loopback file(s):\n %s\n", join(", ", map { $_->{loopback_file} } @{$part->{loopback}})) if isPartOfLoopback($part);
$info .= N("Partition booted by default\n (for MS-DOS boot, not for lilo)\n") if $part->{active} && $::expert;