From 92f446697c1e6f2cc8ce693d135b501fe0e4e501 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Wed, 10 Sep 2003 14:11:53 +0000
Subject: make sure mouse modules are loaded before using them (usefull for
 defcfg or recovery).

---
 perl-install/install2.pm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

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
 
-- 
cgit v1.2.1