summaryrefslogtreecommitdiffstats
path: root/perl-install/scanner.pm
diff options
context:
space:
mode:
authorTill Kamppeter <tkamppeter@mandriva.com>2003-02-28 01:00:36 +0000
committerTill Kamppeter <tkamppeter@mandriva.com>2003-02-28 01:00:36 +0000
commit65a233d0370511236e8879136caaa2cd4d307c1e (patch)
treed9f823e67bdc6ca79b276d912c52b1c90ffc66cf /perl-install/scanner.pm
parenta7f6e83d669be2b2b8649ab198159972e890072e (diff)
downloaddrakx-65a233d0370511236e8879136caaa2cd4d307c1e.tar
drakx-65a233d0370511236e8879136caaa2cd4d307c1e.tar.gz
drakx-65a233d0370511236e8879136caaa2cd4d307c1e.tar.bz2
drakx-65a233d0370511236e8879136caaa2cd4d307c1e.tar.xz
drakx-65a233d0370511236e8879136caaa2cd4d307c1e.zip
- Fixed confScanner() deleting the config file in some cases.
- Removed PDQ from share/rpmsrate
Diffstat (limited to 'perl-install/scanner.pm')
-rwxr-xr-xperl-install/scanner.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/scanner.pm b/perl-install/scanner.pm
index 7f843bc3e..08ac062a8 100755
--- a/perl-install/scanner.pm
+++ b/perl-install/scanner.pm
@@ -48,9 +48,10 @@ sub confScanner {
next if $line =~ /\$VENDOR/;
$line =~ s/\$PRODUCT/$product/g if $product;
next if $line =~ /\$PRODUCT/;
- $line =~ /^(\S+)LINE\s+(.*?)$/;
+ $line =~ /^(\S*)LINE\s+(.*?)$/;
my $linetype = $1;
$line = $2;
+ next if !$line;
if (!$linetype or
($linetype eq "USB" and ($port =~ /usb/i or $vendor)) or
($linetype eq "PARPORT" and !$vendor and