summaryrefslogtreecommitdiffstats
path: root/perl-install/lang.pm
diff options
context:
space:
mode:
authorPablo Saratxaga <pablo@mandriva.com>1999-12-15 02:51:53 +0000
committerPablo Saratxaga <pablo@mandriva.com>1999-12-15 02:51:53 +0000
commit42ded0f5b50145273e019818e4e3eb002667aff8 (patch)
tree8de2b875de5410897d59763e402a639cca070155 /perl-install/lang.pm
parente429fba02079ef644e4a85d849e11a381c9334b9 (diff)
downloaddrakx-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.pm5
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");