From c367a7b536cbc28a666370a8935718980bdc5ee3 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 2 May 2000 14:52:41 +0000 Subject: no_comment --- perl-install/install2.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'perl-install/install2.pm') diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 8e684a2aa..d8bd61b9c 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -555,6 +555,7 @@ sub main { }}{lc $n}; &$f if $f; } %cmdline; + undef $::auto_install if $cfg; if ($::g_auto_install) { (my $root = `/bin/pwd`) =~ s|(/[^/]*){5}$||; symlinkf $root, "/tmp/rhimage" or die "unable to create link /tmp/rhimage"; @@ -622,6 +623,8 @@ sub main { #- needed very early for install_steps_gtk eval { ($o->{mouse}, $o->{wacom}) = mouse::detect() } unless $o->{nomouseprobe} || $o->{mouse}; + lang::set($o->{lang}) if $o->{lang} ne 'en'; #- mainly for defcfg + $o->{allowFB} = listlength(cat_("/proc/fb")); my $o_; -- cgit v1.2.1