summaryrefslogtreecommitdiffstats
path: root/perl-install/bootloader.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-01-06 18:31:26 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-01-06 18:31:26 +0000
commit4d4d4ac3c15d8449b40cfc2492d0f2685d1a4978 (patch)
treef2db75eec198757355fb806d5015ddac0c0127dc /perl-install/bootloader.pm
parent9dbafe26491c2a675728a892cf74878630175d79 (diff)
downloaddrakx-4d4d4ac3c15d8449b40cfc2492d0f2685d1a4978.tar
drakx-4d4d4ac3c15d8449b40cfc2492d0f2685d1a4978.tar.gz
drakx-4d4d4ac3c15d8449b40cfc2492d0f2685d1a4978.tar.bz2
drakx-4d4d4ac3c15d8449b40cfc2492d0f2685d1a4978.tar.xz
drakx-4d4d4ac3c15d8449b40cfc2492d0f2685d1a4978.zip
when reading existing config, remove double quotes around the default label
Diffstat (limited to 'perl-install/bootloader.pm')
-rw-r--r--perl-install/bootloader.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm
index bf36741ca..ee6378cdb 100644
--- a/perl-install/bootloader.pm
+++ b/perl-install/bootloader.pm
@@ -125,6 +125,7 @@ sub read() {
}
$_->{append} = remove_quotes_and_spaces($_->{append}) foreach \%b, @{$b{entries}};
$_->{label} = remove_quotes_and_spaces($_->{label}) foreach @{$b{entries}};
+ $b{default} = remove_quotes_and_spaces($b{default}) if $b{default};
$b{timeout} = $b{timeout} / 10 if $b{timeout};
$b{message} = cat_("$::prefix$b{message}") if $b{message};
}