From 7c43409d9ff37c0df4d9b6d6da8491ff84b3bce2 Mon Sep 17 00:00:00 2001 From: Pascal Terjan Date: Sat, 14 May 2011 14:29:53 +0000 Subject: match partitions when one of them as device_alias to the device of the other one --- perl-install/fs/get.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'perl-install/fs/get.pm') diff --git a/perl-install/fs/get.pm b/perl-install/fs/get.pm index 8e49e91fa..461984431 100644 --- a/perl-install/fs/get.pm +++ b/perl-install/fs/get.pm @@ -144,7 +144,10 @@ sub is_same_hd { } else { $hd1->{device_LABEL} && $hd2->{device_LABEL} && $hd1->{device_LABEL} eq $hd2->{device_LABEL} || $hd1->{device_UUID} && $hd2->{device_UUID} && $hd1->{device_UUID} eq $hd2->{device_UUID} - || $hd1->{device} && $hd2->{device} && $hd1->{device} eq $hd2->{device}; + || $hd1->{device} && $hd2->{device} && $hd1->{device} eq $hd2->{device} + || $hd1->{device} && $hd2->{device_alias} && $hd1->{device} eq $hd2->{device_alias} + || $hd1->{device_alias} && $hd2->{device} && $hd1->{device_alias} eq $hd2->{device} + || $hd1->{device_alias} && $hd2->{device_alias} && $hd1->{device_alias} eq $hd2->{device_alias}; } } -- cgit v1.2.1