From 73c851144720e28b21a491b6250385170db9d752 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 24 Apr 2003 19:00:12 +0000 Subject: perl_checker adaptations + fixes --- perl-install/scanner.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/scanner.pm') diff --git a/perl-install/scanner.pm b/perl-install/scanner.pm index cab0f344e..8234ee218 100755 --- a/perl-install/scanner.pm +++ b/perl-install/scanner.pm @@ -71,7 +71,7 @@ sub add2dll { output("$sanedir/dll.conf", @dllconf); } -sub configured { +sub configured() { my @res; # Run "scanimage -L", to find the scanners which are already working local *LIST; @@ -309,7 +309,7 @@ sub readScannerDB { \%cards; } -sub updateScannerDBfromUsbtable { +sub updateScannerDBfromUsbtable() { substInFile { s/END// } "ScannerDB"; my $to_add = "# generated from usbtable by scannerdrake\n"; foreach (cat_("$ENV{SHARE_PATH}/ldetect-lst/usbtable")) { -- cgit v1.2.1