summaryrefslogtreecommitdiffstats
path: root/perl-install/fs
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-06-24 00:01:53 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-06-24 00:56:42 +0200
commita8a8c3e978deba5f5a20b70ce7b871b68562ce15 (patch)
tree0e1fb56773ddc788547b975d9a7f6b0927bfcf6a /perl-install/fs
parentf403c342c192e96b9765ca5a039ab2d8efb94208 (diff)
downloaddrakx-a8a8c3e978deba5f5a20b70ce7b871b68562ce15.tar
drakx-a8a8c3e978deba5f5a20b70ce7b871b68562ce15.tar.gz
drakx-a8a8c3e978deba5f5a20b70ce7b871b68562ce15.tar.bz2
drakx-a8a8c3e978deba5f5a20b70ce7b871b68562ce15.tar.xz
drakx-a8a8c3e978deba5f5a20b70ce7b871b68562ce15.zip
fix preserving UUID when formating jfs/nilfs/xfs
Diffstat (limited to 'perl-install/fs')
-rw-r--r--perl-install/fs/format.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/fs/format.pm b/perl-install/fs/format.pm
index 72e2504e1..f1efb8448 100644
--- a/perl-install/fs/format.pm
+++ b/perl-install/fs/format.pm
@@ -196,7 +196,7 @@ sub part_raw {
# Preserve UUID on fs where we couldn't enforce it while formatting
if (my $uuid_cmd = $preserve_UUID{$fs_type}) {
(undef, $cmd) = @$uuid_cmd;
- run_program::raw({}, $cmd, '-U', devices::make($dev)) if $cmd;
+ run_program::raw({}, $cmd, '-U', $part->{device_UUID}, devices::make($dev)) if $cmd;
}
if (member($fs_type, qw(ext3 ext4))) {