diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install2.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index ce8954cc3..f841e44bd 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -541,7 +541,13 @@ sub main { } #- needed very early for install_steps_gtk - eval { $o->{mouse} = mouse::detect() } if !$o->{nomouseprobe} && !$o->{mouse} && !$::testing; + unless ($::testing) { + if ($o->{mouse}) { + mouse::load_modules(); + } else { + eval { $o->{mouse} = mouse::detect() } unless $o->{nomouseprobe}; + } + } $o->{locale}{lang} = lang::set($o->{locale}{lang}) if $o->{locale}{lang} ne 'en_US'; #- mainly for defcfg |