summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-12-02 15:22:35 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-12-02 15:22:35 +0000
commitb08dab6f1a6775ebe077bf0e135bd12811cacd36 (patch)
treec24fc2e5db251353113c2361688f30ced1201ddd /perl-install/install_steps.pm
parentc83f743fe269a2aecfa03df12bfe698800296455 (diff)
downloaddrakx-b08dab6f1a6775ebe077bf0e135bd12811cacd36.tar
drakx-b08dab6f1a6775ebe077bf0e135bd12811cacd36.tar.gz
drakx-b08dab6f1a6775ebe077bf0e135bd12811cacd36.tar.bz2
drakx-b08dab6f1a6775ebe077bf0e135bd12811cacd36.tar.xz
drakx-b08dab6f1a6775ebe077bf0e135bd12811cacd36.zip
create fix_broken_alternatives()
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm9
1 files changed, 1 insertions, 8 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index eb64f1b68..dc158e591 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -514,14 +514,7 @@ GridHeight=70
}
}
- #- fix bad update-alternatives that may occurs after upgrade (but let them for install too).
- if (-d "$o->{prefix}/etc/alternatives") {
- foreach (all("$o->{prefix}/etc/alternatives")) {
- next if run_program::rooted($o->{prefix}, 'test', '-e', "/etc/alternatives/$_");
- log::l("fixing broken alternative $_");
- run_program::rooted($o->{prefix}, "update-alternatives", "--auto", $_);
- }
- }
+ fix_broken_alternatives();
#- update theme directly from a package (simplest).
if (-s "$o->{prefix}/usr/share/oem-theme.rpm") {