diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-08-11 02:22:15 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-08-11 02:22:15 +0000 |
| commit | 60c5be6245a02d6f09aebd2d257716a578bc90c3 (patch) | |
| tree | 9deeba176c0a0e0271bac780541305e799d668e9 /perl-install/scanner.pm | |
| parent | 07d2e1e1e8da3b23c77c741236312c63485c550b (diff) | |
| download | drakx-60c5be6245a02d6f09aebd2d257716a578bc90c3.tar drakx-60c5be6245a02d6f09aebd2d257716a578bc90c3.tar.gz drakx-60c5be6245a02d6f09aebd2d257716a578bc90c3.tar.bz2 drakx-60c5be6245a02d6f09aebd2d257716a578bc90c3.tar.xz drakx-60c5be6245a02d6f09aebd2d257716a578bc90c3.zip | |
perl_checker compliance
Diffstat (limited to 'perl-install/scanner.pm')
| -rwxr-xr-x | perl-install/scanner.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/scanner.pm b/perl-install/scanner.pm index e1267c600..13d867bff 100755 --- a/perl-install/scanner.pm +++ b/perl-install/scanner.pm @@ -246,7 +246,7 @@ sub get_usb_ids_for_port { while (my $line = <DETECT>) { if ($line =~ /ID\s+([0-9a-f]+):(0x[0-9a-f]+)($|\s+)/) { # Scanner connected via scanner.o kernel module - return ("0x$1", "0x$2"); + return "0x$1", "0x$2"; last; } } @@ -257,7 +257,7 @@ sub get_usb_ids_for_port { if ($line =~ /^\s*found\s+USB\s+scanner/i) { if ($line =~ /vendor=(0x[0-9a-f]+)[^0-9a-f]+.*prod(|uct)=(0x[0-9a-f]+)[^0-9a-f]+/) { # Scanner connected via scanner.o kernel module - return ($1, $3); + return $1, $3; } } } |