diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-11-18 14:37:50 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-11-18 14:37:50 +0000 |
commit | 7fbfd48f4107df099475128f90b597b36641c2d2 (patch) | |
tree | af8ef447c33677fd1c9f872184c8c5325de89fee /move/make_live_tree_boot | |
parent | 4945f073b797f4ebc9a8207054b80b336649575b (diff) | |
download | drakx-7fbfd48f4107df099475128f90b597b36641c2d2.tar drakx-7fbfd48f4107df099475128f90b597b36641c2d2.tar.gz drakx-7fbfd48f4107df099475128f90b597b36641c2d2.tar.bz2 drakx-7fbfd48f4107df099475128f90b597b36641c2d2.tar.xz drakx-7fbfd48f4107df099475128f90b597b36641c2d2.zip |
try replacing __LANG__ with fr_FR (same for other langs) then with fr (same
for other langs) in always_i18n file list
Diffstat (limited to 'move/make_live_tree_boot')
-rwxr-xr-x | move/make_live_tree_boot | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/move/make_live_tree_boot b/move/make_live_tree_boot index 379f60c8d..b31cecfa2 100755 --- a/move/make_live_tree_boot +++ b/move/make_live_tree_boot @@ -1,6 +1,8 @@ #!/usr/bin/perl -use MDK::Common; +use lib qw(../perl-install); +use common; +use lang; my $prefix = '/tmp/live_tree'; my @ALLOWED_LANGS = split(' ', first(cat_('move.pm') =~ /ALLOWED_LANGS = qw\((.*)\)/)); @@ -127,9 +129,15 @@ if (!@ARGV) { create_light_tree('boot', \@boot_list); create_light_tree('totem', \@totem_list); foreach my $lang (@ALLOWED_LANGS) { + my $full_lang = lang::l2locale($lang); + my ($short_lang) = $full_lang =~ /(..)/; my @list = map { my $s = $_; - $s =~ s/__LANG__/$lang/; + $s =~ s/__LANG__/$full_lang/; + if (! -e $s) { + $s = $_; + $s =~ s/__LANG__/$short_lang/; + } if (readlink($s) =~ m!^[^/]!) { system('cp', $s, "$s-"); rename "$s-", $s; |