add boot splash to initrd only once (pterjan)

1 files changed, 9 insertions, 1 deletions

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 1613cd0a2..9816a92b1 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -161,8 +161,16 @@ sub add_boot_splash {
 sub update_splash {
     my ($bootloader) = @_;
 
+    my %real_initrd_entries;
     foreach (@{$bootloader->{entries}}) {
-	add_boot_splash($_->{initrd}, $_->{vga} || $bootloader->{vga}) if $_->{initrd};
+	if ($_->{initrd}) {
+	    my $initrd = expand_symlinks($_->{initrd});
+	    $real_initrd_entries{$initrd} = $_;
+	}
+    }
+    foreach (values %real_initrd_entries) {
+        log::l("add boot splash to $_->{initrd}\n");
+	add_boot_splash($_->{initrd}, $_->{vga} || $bootloader->{vga});
     }
 }