diff options
Diffstat (limited to 'perl-install/detect_devices.pm')
| -rw-r--r-- | perl-install/detect_devices.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 62151b65a..b076187a4 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -906,8 +906,8 @@ sub pcmcia_probe() { map { my $dir = "$dev_dir/$_"; my $get = sub { chomp_(cat_("$dir/$_[0]")) }; - my $class_dev = first(glob_("$dir/tty*")); - my $device = $class_dev && get_sysfs_field_from_link($dir, basename($class_dev)); + my $class_dev = first(glob_("$dir/tty/tty*")); + my $device = $class_dev && basename($class_dev); my $modalias = $get->('modalias'); my $driver = get_sysfs_field_from_link($dir, 'driver'); #- fallback on modalias result |