From a3f1e174600a1fb4be548efa65e51c44cb5fb67b Mon Sep 17 00:00:00 2001 From: Till Kamppeter Date: Tue, 18 Feb 2003 22:30:55 +0000 Subject: Replaced "my" by "our" for the declaration of the "ScannerDB" variable, so that /usr/bin/scannerdrake has access to it. --- perl-install/scanner.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/scanner.pm b/perl-install/scanner.pm index 759d2e5f5..a2e68a6a5 100755 --- a/perl-install/scanner.pm +++ b/perl-install/scanner.pm @@ -32,7 +32,7 @@ use handle_configs; my $sanedir = "$::prefix/etc/sane.d"; my $scannerDBdir = "$::prefix$ENV{SHARE_PATH}/ldetect-lst"; -my $scannerDB = readScannerDB("$scannerDBdir/ScannerDB"); +our $scannerDB = readScannerDB("$scannerDBdir/ScannerDB"); sub confScanner { my ($model, $port, $vendor, $product) = @_; -- cgit v1.2.1