summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 0eec3a2ed..850a3be52 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -489,9 +489,10 @@ sub load_module {
my ($in, $type) = @_;
my @options;
+ (my $msg_type = $type) =~ s/\|.*//;
my $m = $in->ask_from_listf('',
#-PO: the %s is the driver type (scsi, network, sound,...)
- _("Which %s driver should I try?", $type),
+ _("Which %s driver should I try?", $msg_type),
\&modules::module2text,
[ modules::module_of_type($type) ]) or return;
my $l = modules::module2text($m);