summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2006-03-13 09:57:10 +0000
committerPascal Rigaux <pixel@mandriva.com>2006-03-13 09:57:10 +0000
commit44a5ab88960b456c92b6a2ff1fcf7c000abb1372 (patch)
tree6428f22431d745ae04f5732bd83d6e65c118598a /perl-install
parentf5bca9eee88ac0d98fba33c8870b59c291d9d488 (diff)
downloaddrakx-backup-do-not-use-44a5ab88960b456c92b6a2ff1fcf7c000abb1372.tar
drakx-backup-do-not-use-44a5ab88960b456c92b6a2ff1fcf7c000abb1372.tar.gz
drakx-backup-do-not-use-44a5ab88960b456c92b6a2ff1fcf7c000abb1372.tar.bz2
drakx-backup-do-not-use-44a5ab88960b456c92b6a2ff1fcf7c000abb1372.tar.xz
drakx-backup-do-not-use-44a5ab88960b456c92b6a2ff1fcf7c000abb1372.zip
call expand_entry_symlinks() before comparing with same_entries() (bugzilla #21566)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/bootloader.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 348c3972e..93f3215c1 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -447,6 +447,9 @@ sub add_entry {
if ($conflicting) {
#- replacing $conflicting with $to_add
@{$bootloader->{entries}} = map { $_ == $conflicting ? $to_add : $_ } @{$bootloader->{entries}};
+
+ #- we will keep $conflicting, but not with same symlinks if used by the entry to add
+ expand_entry_symlinks($bootloader, $conflicting);
} else {
#- we have found an unused label
push @{$bootloader->{entries}}, $to_add;
@@ -459,7 +462,6 @@ sub add_entry {
$to_add = $conflicting;
if ($to_add->{label} eq 'linux') {
- expand_entry_symlinks($bootloader, $to_add);
$label = kernel_str2label(vmlinuz2kernel_str($to_add->{kernel_or_dev}), 'use_long_name');
} else {
$label =~ s/^alt\d*_//;