diff options
| -rw-r--r-- | perl-install/any.pm | 2 | ||||
| -rw-r--r-- | perl-install/detect_devices.pm | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index ae73ddbf6..279bb3f21 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -846,7 +846,7 @@ sub report_bug { header("scsi"), cat_("/proc/scsi/scsi"), header("lsmod"), cat_("/proc/modules"), header("cmdline"), cat_("/proc/cmdline"), - header("pcmcia: stab"), cat_("/var/run/stab"), + header("pcmcia: stab"), cat_('/var/run/stab'), cat_('/var/lib/pcmcia/stab'), header("usb"), cat_("/proc/bus/usb/devices"), header("partitions"), cat_("/proc/partitions"), header("cpuinfo"), cat_("/proc/cpuinfo"), diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 0fa9297aa..c5f7ff4a2 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -249,10 +249,10 @@ sub usb_probe { } sub pcmcia_probe { - -e "/var/run/stab" or return (); + -e '/var/run/stab' || -e '/var/lib/pcmcia/stab' or return (); my (@devs, $desc); - foreach (cat_("/var/run/stab")) { + foreach (cat_('/var/run/stab'), cat_('/var/lib/pcmcia/stab')) { if (/^Socket\s+\d+:\s+(.*)/) { $desc = $1; } else { |