diff options
Diffstat (limited to 'perl-install/fs.pm')
| -rw-r--r-- | perl-install/fs.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/fs.pm b/perl-install/fs.pm index 2839489ba..a8c479989 100644 --- a/perl-install/fs.pm +++ b/perl-install/fs.pm @@ -129,7 +129,7 @@ sub merge_fstabs { sub analyze_wild_device_name { my ($dev) = @_; - if ($dev =~ m!^/(tmp|u?dev)/(.*)!) { + if ($dev =~ m!^/u?dev/(.*)!) { 'dev', $dev; } elsif ($dev !~ m!^/! && -e "$::prefix/dev/$dev") { 'dev', "/dev/$dev"; @@ -161,7 +161,7 @@ sub subpart_from_wild_device_name { } my $symlink = readlink("$::prefix$dev"); - $dev =~ s!/(tmp|u?dev)/!!; + $dev =~ s!/u?dev/!!; if ($symlink && $symlink =~ m|^[^/]+$|) { $part{device_alias} = $dev; |