diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-04-23 09:52:22 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-04-23 09:52:22 +0000 |
commit | bb715ccb40387957e6500422961ebcb7a4da13d7 (patch) | |
tree | bd397f9dbc739a847e33ad365a31849a6ec9fe0d /perl-install/modules.pm | |
parent | 7c589b73957e7d1a04b1058fd9983a78940dd731 (diff) | |
download | drakx-bb715ccb40387957e6500422961ebcb7a4da13d7.tar drakx-bb715ccb40387957e6500422961ebcb7a4da13d7.tar.gz drakx-bb715ccb40387957e6500422961ebcb7a4da13d7.tar.bz2 drakx-bb715ccb40387957e6500422961ebcb7a4da13d7.tar.xz drakx-bb715ccb40387957e6500422961ebcb7a4da13d7.zip |
(probe_category) perl_checker cleanup
Diffstat (limited to 'perl-install/modules.pm')
-rw-r--r-- | perl-install/modules.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 3b5494220..8686eaa9c 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -142,8 +142,9 @@ sub probe_category { my $b = $_->{driver} =~ /ISDN:([^,]*),?([^,]*)(?:,firmware=(.*))?/; if ($b) { $_->{driver} = $1; + $_->{type} = $2; + $_->{type} =~ s/type=//; $_->{firmware} = $3; - ($_->{type}) = $2 =~ /type=(\d+)/; $_->{driver} eq "hisax" and $_->{options} .= " id=HiSax"; } $b; |