From 59ef5c4f7b0fa1f4fe427f7cc90d90199dfde524 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Wed, 19 Jul 2000 13:15:15 +0000 Subject: *** empty log message *** --- perl-install/any.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'perl-install/any.pm') diff --git a/perl-install/any.pm b/perl-install/any.pm index 23313c5f6..52b33a9ad 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -137,7 +137,9 @@ You can add some more or change the existing ones."), if ($in->ask_from_list_('', _("Which type of entry do you want to add?"), [ __("Linux"), arch() =~ /sparc/ ? __("Other OS (SunOS...)") : __("Other OS (windows...)") ] ) eq "Linux") { - $e = { type => 'image' }; + $e = { type => 'image', + root => '/dev/' . fsedit::get_root($fstab)->{device}, #- assume a good default. + }; $prefix = "linux"; } else { $e = { type => 'other' }; -- cgit v1.2.1