From 563fa5f3a9bea3e22073f34446dfbc6dfcf7b0fb Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Wed, 4 Apr 2001 16:01:34 +0000
Subject: fixed parport probe for printer under 2.4 kernel.

---
 perl-install/detect_devices.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 51fb9e95b..6d0d1cc31 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -262,10 +262,11 @@ sub hasUltra66 {
 }
 
 sub whatParport() {
-    my @res =();
+    my @res = ();
     foreach (0..3) {
 	my $elem = {};
-	local *F; open F, "/proc/parport/$_/autoprobe" or next;
+	local *F;
+	open F, "/proc/parport/$_/autoprobe" or open F, "/proc/sys/dev/parport/parport$_/autoprobe" or next;
 	local $_;
 	while (<F>) { $elem->{$1} = $2 if /(.*):(.*);/ }
 	push @res, { port => "/dev/lp$_", val => $elem};
-- 
cgit v1.2.1