From babfde139c9ddc0bf9e7574c824e2fe611ad4b3d Mon Sep 17 00:00:00 2001
From: Yves Duret <yduret@mandriva.com>
Date: Mon, 18 Feb 2002 17:34:31 +0000
Subject: update

---
 perl-install/scanner.pm | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'perl-install')

diff --git a/perl-install/scanner.pm b/perl-install/scanner.pm
index 0a18acd71..0ddae6c66 100755
--- a/perl-install/scanner.pm
+++ b/perl-install/scanner.pm
@@ -40,6 +40,7 @@ sub confScanner {
     my ($model, $port) = @_;
     $port = detect_devices::dev_is_devfs() ? "$prefix/dev/usb/scanner0" : "$prefix/dev/scanner" if (!$port);
     my $a = $scannerDB->{$model}{server};
+    #print "file:[$a]\t[$model]\t[$port]\n| ", (join "\n| ", @{$scannerDB->{$model}{lines}}),"\n";
     output("$_sanedir/$a.conf", (join "\n",@{$scannerDB->{$model}{lines}}));
     substInFile {s/\$DEVICE/$port/} "$_sanedir/$a.conf";
     add2dll($a);
@@ -209,6 +210,9 @@ sub updateScannerDBfromSane {
 
 #-----------------------------------------------
 # $Log$
+# Revision 1.5  2002/02/18 17:34:31  yduret
+# update
+#
 # Revision 1.4  2002/02/18 16:16:13  yduret
 # scsi parport preliminary support
 # no more show unsupported scanner
-- 
cgit v1.2.1