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 /perl-install | |
| parent | f5d46f4cf39ffec28c9f626c6f4595bac78193a3 (diff) | |
| download | drakx-94b0f241d792c105c85eb51b4af04cbf703f3408.tar drakx-94b0f241d792c105c85eb51b4af04cbf703f3408.tar.gz drakx-94b0f241d792c105c85eb51b4af04cbf703f3408.tar.bz2 drakx-94b0f241d792c105c85eb51b4af04cbf703f3408.tar.xz drakx-94b0f241d792c105c85eb51b4af04cbf703f3408.zip | |
(device_name_to_entry) remove unused $variable
Diffstat (limited to 'perl-install')
| -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; } |