diff options
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/bootloader.pm | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/perl-install/bootloader.pm b/perl-install/bootloader.pm index 6bb970f33..d37b47664 100644 --- a/perl-install/bootloader.pm +++ b/perl-install/bootloader.pm @@ -792,10 +792,19 @@ EOF output "$prefix/boot/grub/messages", map { substr(translate($_) . "\n", 0, 78) } ( #- ensure the translated messages are not too big the hard way #-PO: these messages will be displayed at boot time in the BIOS, use only ASCII (7bit) +#-PO: and keep them smaller than 79 chars long __("Welcome to GRUB the operating system chooser!"), +#-PO: these messages will be displayed at boot time in the BIOS, use only ASCII (7bit) +#-PO: and keep them smaller than 79 chars long __("Use the %c and %c keys for selecting which entry is highlighted."), +#-PO: these messages will be displayed at boot time in the BIOS, use only ASCII (7bit) +#-PO: and keep them smaller than 79 chars long __("Press enter to boot the selected OS, \'e\' to edit the"), +#-PO: these messages will be displayed at boot time in the BIOS, use only ASCII (7bit) +#-PO: and keep them smaller than 79 chars long __("commands before booting, or \'c\' for a command-line."), +#-PO: these messages will be displayed at boot time in the BIOS, use only ASCII (7bit) +#-PO: and keep them smaller than 79 chars long __("The highlighted entry will be booted automatically in %d seconds."), ); @@ -891,8 +900,11 @@ sub install_loadlin_desktop { my ($lilo, $windrive) = @_; my $windir = lc(cat_("$windrive/msdos.sys") =~ /^WinDir=.:\\(\S+)/m ? $1 : "windows"); +#-PO: "Desktop" and "Start Menu" are the name of the directories found in c:\windows +#-PO: so you may need to put them in English or in a different language if MS-windows doesn't exist in your language + foreach (__("Desktop"), #-PO: "Desktop" and "Start Menu" are the name of the directories found in c:\windows - foreach (__("Desktop"), __("Start Menu")) { + __("Start Menu")) { my $d = "$windrive/$windir/" . translate($_); -d $d or $d = "$windrive/$windir/$_"; -d $d or log::l("can't find windows $d directory"), next; |