From 1a9643beb30e238fda21978d41e8c7af6b18cffb Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 8 Aug 2002 11:40:31 +0000 Subject: old hp scanners report themselves as "Processor"s as : - tested in hw lab - written in linux/include/scsi/scsi.h: "TYPE_PROCESSOR.*HP scanners use this" - reported by sane-find-sane: "old HP scanners use the CPU id" --- perl-install/detect_devices.pm | 2 +- perl-install/scanner.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install') 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; -- cgit v1.2.1