From dd14d019f7e3a18b6eb396d1ef25877ef4f0aa40 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 6 Jul 2004 05:16:12 +0000 Subject: cleanup --- perl-install/bootloader.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'perl-install/bootloader.pm') diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 71a7268b2..1fd1b39a1 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -982,8 +982,7 @@ sub write_lilo { push @entry_conf, "initrd=" . $file2fullname->($_->{initrd}) if $_->{initrd}; push @entry_conf, qq(append="$_->{append}") if $_->{append}; push @entry_conf, "vga=$_->{vga}" if $_->{vga}; - push @entry_conf, "read-write" if $_->{'read-write'}; - push @entry_conf, "read-only" if !$_->{'read-write'}; + push @entry_conf, $_->{'read-write'} ? "read-write" : "read-only"; } else { push @entry_conf, "table=$_->{table}" if $_->{table}; push @entry_conf, "unsafe" if $_->{unsafe} && !$_->{table}; -- cgit v1.2.1