diff options
| -rw-r--r-- | perl-install/detect_devices.pm | 2 | ||||
| -rwxr-xr-x | perl-install/scanner.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index e3b053fa0..6f5086a0e 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -195,7 +195,7 @@ sub getSCSI() { each_index { put_in_hash $_, { media_type => 'scanner' }; - } grep { $_->{raw_type} =~ /Scanner/ } @l; + } grep { $_->{raw_type} =~ /Scanner/ || $_->{raw_type} =~ /Processor /} @l; get_devfs_devices(@l); get_sys_cdrom_info(@l); diff --git a/perl-install/scanner.pm b/perl-install/scanner.pm index 502237c19..fccca25e8 100755 --- a/perl-install/scanner.pm +++ b/perl-install/scanner.pm @@ -66,7 +66,7 @@ sub detect { ++$i; } foreach (grep { $_->{media_type} =~ /scanner/ } detect_devices::getSCSI()) { - push @res, { port => "/dev/usb/scanner$i", + push @res, { port => "/dev/sg", val => { DESCRIPTION => $_->{info} }, }; ++$i; |