From b809fb59b049710d7510b991f3f983e85fcf9c2e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 11 May 2004 23:21:04 +0000 Subject: - don't propose languages which do not have their clp - mount the live_tree_i18n_LANG.clp --- move/move.pm | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'move') diff --git a/move/move.pm b/move/move.pm index 2d072deed..951909c2d 100644 --- a/move/move.pm +++ b/move/move.pm @@ -213,6 +213,13 @@ drakx_stuff: #- don't use shadow passwords since pwconv overwrites /etc/shadow hence contents will be lost for usb key delete $o->{authentication}{shadow}; + foreach my $lang (keys %lang::langs) { + my $dir = '/usr/share/locale/' . lang::l2locale($lang); + my $link = readlink($dir) or next; + my ($name) = $link =~ m!image_(i18n_.*?)/! or log::l("ERROR: bad link $link for $dir"), next; + log::l("disabling lang $lang"); + -e "/cdrom/live_tree_$name.clp" or delete $lang::langs{$lang}; + } } sub lomount_clp { @@ -243,6 +250,7 @@ sub install2::autoSelectLanguage { sub install2::handleI18NClp { my $o = $::o; + lomount_clp("i18n_$o->{locale}{lang}", '/usr'); lomount_clp("always_i18n_$o->{locale}{lang}", '/usr'); } -- cgit v1.2.1