From 1c988d55aee0fc240fcdbf3001195437ed9061c8 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sun, 3 Aug 2003 21:50:42 +0000
Subject: don't overwrite $o->{bootloader}{method} (much nicer for
 auto_installs)

---
 perl-install/bootloader.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/bootloader.pm')

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index b1588429e..b185a5263 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -638,7 +638,7 @@ wait %d seconds for default boot.
 	}
     }
     $bootloader->{default} ||= "linux";
-    $bootloader->{method} = first(method_choices($fstab, $bootloader));
+    $bootloader->{method} ||= first(method_choices($fstab, $bootloader));
 }
 
 sub detect_bootloader() {
-- 
cgit v1.2.1