diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-19 13:36:08 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-19 13:36:08 +0000 |
commit | c2b44f66b9d3bccd78764b208feaa9d9a119a0a1 (patch) | |
tree | d9a3be817d231502da399f056374e25491551ae0 /perl-install/install_steps.pm | |
parent | 6a05c7c12fcc70058febc82d139dbe4155ac951b (diff) | |
download | drakx-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.pm | 8 |
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}; |