summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-04-19 13:36:08 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-04-19 13:36:08 +0000
commitc2b44f66b9d3bccd78764b208feaa9d9a119a0a1 (patch)
treed9a3be817d231502da399f056374e25491551ae0 /perl-install/install_steps.pm
parent6a05c7c12fcc70058febc82d139dbe4155ac951b (diff)
downloaddrakx-c2b44f66b9d3bccd78764b208feaa9d9a119a0a1.tar
drakx-c2b44f66b9d3bccd78764b208feaa9d9a119a0a1.tar.gz
drakx-c2b44f66b9d3bccd78764b208feaa9d9a119a0a1.tar.bz2
drakx-c2b44f66b9d3bccd78764b208feaa9d9a119a0a1.tar.xz
drakx-c2b44f66b9d3bccd78764b208feaa9d9a119a0a1.zip
no_comment
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index aaa8a0a9f..3d24cf629 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -295,7 +295,10 @@ sub installPackages($$) { #- complete REWORK, TODO and TOCHECK!
#- small transaction will be built based on this selection and depslist.
my @toInstall = pkgs::packagesToInstall($packages);
+
+ $ENV{DURING_INSTALL} = 1;
pkgs::install($o->{prefix}, $o->{isUpgrade}, \@toInstall, $packages->[1], $packages->[2]);
+ delete $ENV{DURING_INSTALL};
}
sub afterInstallPackages($) {
@@ -329,10 +332,7 @@ Consoles 1,3,4,7 may also contain interesting information";
run_program::rooted($o->{prefix}, "chkfontpath", "--add", "/usr/X11R6/lib/X11/fonts/mdk");
#- call update-menus at the end of package installation
- {
- local $ENV{DURING_INSTALL}; delete $ENV{DURING_INSTALL};
- run_program::rooted($o->{prefix}, "update-menus");
- }
+ run_program::rooted($o->{prefix}, "update-menus");
#- mainly for auto_install's
run_program::rooted($o->{prefix}, "sh", "-c", $o->{postInstall}) if $o->{postInstall};