diff options
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/drakupdate_fstab | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/drakupdate_fstab b/perl-install/standalone/drakupdate_fstab index d6fd1b22d..14d173893 100755 --- a/perl-install/standalone/drakupdate_fstab +++ b/perl-install/standalone/drakupdate_fstab @@ -48,8 +48,8 @@ sub check_hard_drives { #- do not do anything if there are many partitions #- otherwise we may add main extended partitions - if ($name =~ s!/(part|sd[:alpha:]?)\d+$!!) { - my @parts = grep { /^(part|sd[:alpha:]?)\d+$/ } all($name); + if (my ($path, $prefix) = $name =~ m!^(.*)/(\w+)\d+$!) { + my @parts = grep { /^\Q$prefix\E\d+$/ } all($path); @parts <= 1; } else { 1; |