summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorTill Kamppeter <tkamppeter@mandriva.com>2002-02-12 20:01:54 +0000
committerTill Kamppeter <tkamppeter@mandriva.com>2002-02-12 20:01:54 +0000
commit5b5a3440e2a96654daaa0880048e59323bfa6b66 (patch)
tree16c8c04bb60f57e5bc5e199eab8e883f79cc558c /perl-install
parent24cb0062a2cc97a6acb0fff84696c10db502fb2d (diff)
downloaddrakx-5b5a3440e2a96654daaa0880048e59323bfa6b66.tar
drakx-5b5a3440e2a96654daaa0880048e59323bfa6b66.tar.gz
drakx-5b5a3440e2a96654daaa0880048e59323bfa6b66.tar.bz2
drakx-5b5a3440e2a96654daaa0880048e59323bfa6b66.tar.xz
drakx-5b5a3440e2a96654daaa0880048e59323bfa6b66.zip
In the USB auto-detection checked whether and where the device node was
created.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/detect_devices.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index e658f33e6..e63ba16a8 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -403,8 +403,9 @@ sub whatUsbport() {
my @res = ();
foreach $i (0..15) {
my $port = "/dev/usb/lp$i";
- devices::make("$port");
- open PORT, "$port" or next;
+ my $realport = devices::make("$port");
+ next if (!$realport);
+ open PORT, "$realport" or next;
my $idstr;
# Calculation of IOCTL function 0x84005001 (to get device ID string):
# len = 1024