diff options
| author | Pablo Saratxaga <pablo@mandriva.com> | 1999-12-15 02:51:53 +0000 |
|---|---|---|
| committer | Pablo Saratxaga <pablo@mandriva.com> | 1999-12-15 02:51:53 +0000 |
| commit | 42ded0f5b50145273e019818e4e3eb002667aff8 (patch) | |
| tree | 8de2b875de5410897d59763e402a639cca070155 /perl-install/lang.pm | |
| parent | e429fba02079ef644e4a85d849e11a381c9334b9 (diff) | |
| download | drakx-backup-do-not-use-42ded0f5b50145273e019818e4e3eb002667aff8.tar drakx-backup-do-not-use-42ded0f5b50145273e019818e4e3eb002667aff8.tar.gz drakx-backup-do-not-use-42ded0f5b50145273e019818e4e3eb002667aff8.tar.bz2 drakx-backup-do-not-use-42ded0f5b50145273e019818e4e3eb002667aff8.tar.xz drakx-backup-do-not-use-42ded0f5b50145273e019818e4e3eb002667aff8.zip | |
small fix ( "..../$lang.po " -> ".../$lang.po" )
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index ada998bd8..de0f48509 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -18,7 +18,7 @@ use log; #- languages, carefully choosen) my %languages = ( 'en' => [ 'English (US)', undef, 'en', 'en_US:en' ], - 'en' => [ 'English (UK)', 'iso-8859-1', 'en', 'en_GB:en' ], +'en_GB' => [ 'English (UK)', 'iso-8859-1', 'en', 'en_GB:en' ], 'af' => [ 'Afrikaans', 'iso-8859-1', 'af', 'af:en_ZA' ], #-'ar' => [ 'Arabic', 'iso-8859-6', 'ar', 'ar' ], 'bg' => [ 'Bulgarian', 'cp1251', 'bg', 'bg' ], @@ -206,12 +206,11 @@ sub load_po($) { my ($lang) = @_; my ($s, $from, $to, $state, $fuzzy); - $s .= "package po::I18N;\n"; $s .= "\%$lang = ("; #- $lang = substr($lang, 0, 2); - my $f; -e ($f = "$_/po/$lang.po ") and last foreach @INC; + my $f; -e ($f = "$_/po/$lang.po") and last foreach @INC; unless (-e $f) { -e ($f = "$_") and last foreach @INC; $f = commands::install_cpio("$f/po", "$lang.po"); |