diff options
author | Olivier Blin <oblin@mandriva.org> | 2004-08-13 05:00:28 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.org> | 2004-08-13 05:00:28 +0000 |
commit | 94b0f241d792c105c85eb51b4af04cbf703f3408 (patch) | |
tree | f8d2038f548fa3d07c8399168ef699bff9be7c11 | |
parent | f5d46f4cf39ffec28c9f626c6f4595bac78193a3 (diff) | |
download | drakx-backup-do-not-use-94b0f241d792c105c85eb51b4af04cbf703f3408.tar drakx-backup-do-not-use-94b0f241d792c105c85eb51b4af04cbf703f3408.tar.gz drakx-backup-do-not-use-94b0f241d792c105c85eb51b4af04cbf703f3408.tar.bz2 drakx-backup-do-not-use-94b0f241d792c105c85eb51b4af04cbf703f3408.tar.xz drakx-backup-do-not-use-94b0f241d792c105c85eb51b4af04cbf703f3408.zip |
(device_name_to_entry) remove unused $variable
-rwxr-xr-x | perl-install/standalone/drakupdate_fstab | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/drakupdate_fstab b/perl-install/standalone/drakupdate_fstab index 4a355cc14..31775ca43 100755 --- a/perl-install/standalone/drakupdate_fstab +++ b/perl-install/standalone/drakupdate_fstab @@ -73,7 +73,7 @@ sub device_name_to_entry { } } else { unless ($e = find { $name eq $_->{device} } @l) { - my ($prefix, $nb) = $name =~ m/^(.*?)(\d*)$/; + my ($prefix) = $name =~ m/^(.*?)\d*$/; $e = find { $prefix eq ($_->{prefix} || $_->{device}) } @l; $e->{device} = $name; } |