From 3828c902a9f4a92f9a795116cfa096f37e2e7965 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 6 Sep 2005 08:38:23 +0000
Subject: different entries are same even if readonly value is not the same
 (since we dropped setting readonly)

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

diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index 47f92062d..26ac4b59e 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -384,7 +384,7 @@ sub same_entries {
     my ($a, $b) = @_;
 
     foreach (uniq(keys %$a, keys %$b)) {
-	if (member($_, 'label', 'append', 'mapdrive')) {
+	if (member($_, 'label', 'append', 'mapdrive', 'readonly')) {
 	    next;
 	} else {
 	    next if $a->{$_} eq $b->{$_};
-- 
cgit v1.2.1