From 933aa8acdaaee60500831ad27b0beeb3b35f310a Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 11 Feb 2002 23:13:26 +0000 Subject: allow to edit the initrd field (thx to randy.k.wilson) --- perl-install/any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/any.pm') diff --git a/perl-install/any.pm b/perl-install/any.pm index c8ed731c9..c75c169b5 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -278,7 +278,7 @@ You can add some more or change the existing ones."), if_(arch !~ /ppc|ia64/, { label => _("Video mode"), val => \$e->{vga}, list => [ keys %bootloader::vga_modes ], format => sub { $bootloader::vga_modes{$_[0]} }, not_edit => !$::expert }, ), -{ label => _("Initrd"), val => \$e->{initrd}, list => [ map { s/$prefix//; $_ } glob_("$prefix/boot/initrd*") ] }, +{ label => _("Initrd"), val => \$e->{initrd}, list => [ map { s/$prefix//; $_ } glob_("$prefix/boot/initrd*") ], not_edit => 0 }, { label => _("Read-write"), val => \$e->{'read-write'}, type => 'bool' } ); @l = @l[0..2] unless $::expert; -- cgit v1.2.1