From 186ec5dde43b219d2ee47a4fe95e82a6c56a4e49 Mon Sep 17 00:00:00 2001
From: Till Kamppeter <tkamppeter@mandriva.com>
Date: Mon, 15 Sep 2003 03:10:06 +0000
Subject: perl_checker fix.

---
 perl-install/printer/main.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/printer')

diff --git a/perl-install/printer/main.pm b/perl-install/printer/main.pm
index b4af497f2..6dab5afb7 100644
--- a/perl-install/printer/main.pm
+++ b/perl-install/printer/main.pm
@@ -2184,8 +2184,8 @@ sub configure_hpoj {
 	$serialnumber = $_->{val}{SERIALNUMBER};
 	services::stop("hpoj") if ($bus ne "hpjd");
 	# Check if the device is really an HP multi-function device
-	my $libusb = 0;
-	foreach $libusb (0, 1) {
+	#my $libusb = 0;
+	foreach my $libusb (0, 1) {
 	    # Do access via libusb/user mode only if we have a USB device
 	    next if ($libusb && ($bus ne "usb"));
 	    my $printermoduleunloaded = 0;
-- 
cgit v1.2.1