From 2c4f1afb1d3b9f7235dab7860ed37af47ebeefcd Mon Sep 17 00:00:00 2001
From: Tiago Salem Herrmann <salem@mandriva.com.br>
Date: Mon, 10 Mar 2008 19:16:00 +0000
Subject: - Fix to scanner.pm open usbtable.gz instead of usbtable.

---
 perl-install/scanner.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/scanner.pm')

diff --git a/perl-install/scanner.pm b/perl-install/scanner.pm
index 0d9015eec..dd42cbb7e 100644
--- a/perl-install/scanner.pm
+++ b/perl-install/scanner.pm
@@ -290,7 +290,7 @@ sub detect {
                  
 		# We have vendor and product ID, look up the scanner in
 		# the usbtable
-		foreach my $entry (cat_("$scannerDBdir/usbtable")) {
+		foreach my $entry (common::catMaybeCompressed("$scannerDBdir/usbtable")) {
 		    if ($entry =~ 
 			/^\s*$vendorid\s+$productid\s+.*\"([^\"]+)\"\s*$/) {
 			$description = $1;
-- 
cgit v1.2.1