summaryrefslogtreecommitdiffstats
path: root/perl-install/partition_table.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/partition_table.pm')
-rw-r--r--perl-install/partition_table.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/partition_table.pm b/perl-install/partition_table.pm
index 6ab40174b..4d77c3cd4 100644
--- a/perl-install/partition_table.pm
+++ b/perl-install/partition_table.pm
@@ -264,6 +264,8 @@ sub _get_disk_type {
my ($hd) = @_;
my $current = c::get_disk_type($hd->{file});
$current = 'dos' if $current eq 'msdos';
+ # When a disk contains a FS directly (no partition table) parted calls it loop
+ $current = '' if $current eq 'loop';
$hd->{current_pt_table_type} = $current;
}