diff options
Diffstat (limited to 'perl-install/install2.pm')
| -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 b62511da0..f1464ce1e 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -372,7 +372,6 @@ sub main { require install_steps_auto_install; install_steps_auto_install::errorInStep(); }; - $ENV{SHARE_PATH} ||= "/usr/share"; $ENV{PERL_BADLANG} = 1; $::isInstall = 1; @@ -437,6 +436,13 @@ sub main { }}{lc $n}; &$f if $f; } %cmdline; + if ($::testing) { + $ENV{SHARE_PATH} ||= "/export/Mandrake/mdkinst/usr/share"; + $ENV{SHARE_PATH} = "/usr/share" if !-e $ENV{SHARE_PATH}; + } else { + $ENV{SHARE_PATH} ||= "/usr/share"; + } + undef $::auto_install if $cfg; if ($::g_auto_install) { (my $root = `/bin/pwd`) =~ s|(/[^/]*){5}$||; |