From 7836be4c18d16081800089f0e223454a0d835ebe Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Wed, 19 Mar 2003 17:06:18 +0000
Subject: silently use en_US for arabic.

---
 perl-install/lang.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/perl-install/lang.pm b/perl-install/lang.pm
index bf6813835..87b583bff 100644
--- a/perl-install/lang.pm
+++ b/perl-install/lang.pm
@@ -23,7 +23,7 @@ use log;
 my %langs = (
 'af' =>    [ 'Afrikaans',           'Afrikaans',         'af_ZA', '  3  ', 'iso-8859-1' ],
 'am' =>    [ 'Amharic',             'ZZ emarNa',         'am_ET', '  3  ', 'utf_am' ],
-#'ar' =>    [ 'Arabic',              'AA Arabic',         'ar_EG', ' 23  ', 'utf_ar' ],
+'ar' =>    [ 'Arabic',              'AA Arabic',         'ar_EG', ' 23  ', 'utf_ar' ],
 'az' =>    [ 'Azeri (Latin)',       'Azerbaycanca',      'az_AZ', ' 2   ', 'utf_az' ],
 'be' =>    [ 'Belarussian',         'Belaruskaya',       'be_BY', '1    ', 'cp1251' ],
 'bg' =>    [ 'Bulgarian',           'Blgarski',          'bg_BG', '1    ', 'cp1251' ],
@@ -743,6 +743,9 @@ sub l2pango_font {
 sub set {
     my ($lang, $translate_for_console) = @_;
 
+    #- disable Arabic in install as no (free) fonts are available.
+    $lang eq 'ar' and $lang='en_US';
+
     exists $langs{$lang} or log::l("lang::set: trying to set to $lang but I don't know it!"), return;
 
     my $dir = "$ENV{SHARE_PATH}/locale";
-- 
cgit v1.2.1