summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/fs/format.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/perl-install/fs/format.pm b/perl-install/fs/format.pm
index 101ea4b80..1c7bb5c26 100644
--- a/perl-install/fs/format.pm
+++ b/perl-install/fs/format.pm
@@ -133,6 +133,12 @@ sub part_raw {
disable_forced_fsck($dev);
}
+ after_formatting($part);
+}
+
+sub after_formatting {
+ my ($part) = @_;
+
my $p = fs::type::type_subpart_from_magic($part);
$part->{device_UUID} = $p && $p->{device_UUID};