3 files changed, 44 insertions, 0 deletions
diff --git a/perl-install/share/.cvsignore b/perl-install/share/.cvsignore
new file mode 100644
index 000000000..4173dc671
--- /dev/null
+++ b/perl-install/share/.cvsignore
@@ -0,0 +1,2 @@
+locales.tar.bz2
+locales-*-drakx.tar.bz2
diff --git a/perl-install/share/gen_locales.sh b/perl-install/share/gen_locales.sh
new file mode 100755
index 000000000..bb330d888
--- /dev/null
+++ b/perl-install/share/gen_locales.sh
@@ -0,0 +1,42 @@
+#!/bin/sh
+
+locales=`rpm -q locales`
+file="$locales-drakx.tar.bz2"
+
+# already build?
+[ -e $file ] && exit 0
+
+# remove previous ones
+rm -f locales-*-drakx.tar.bz2
+
+rm -rf .tmp ; mkdir .tmp ; cd .tmp
+tar xfj ../locales-skeleton.tar.bz2
+
+# locale utf-8
+for i in LC_ADDRESS LC_COLLATE LC_CTYPE LC_IDENTIFICATION LC_MEASUREMENT LC_MONETARY LC_NAME LC_NUMERIC LC_PAPER LC_TELEPHONE LC_TIME LC_MESSAGES/SYS_LC_MESSAGES ; do
+    cp -f /usr/share/locale/UTF-8/$i usr/share/locale/UTF-8/$i
+done
+
+# lc_ctype for common encoding
+for i in CP1251 CP1255 CP1256 ISO-8859-13 ISO-8859-14 ISO-8859-15 ISO-8859-2 ISO-8859-3 ISO-8859-5 ISO-8859-7 ISO-8859-9 ISO-8859-9E ; do
+    f=usr/share/locale/$i/LC_CTYPE
+    [ -e /$f ] || { echo missing /$f ; exit 1 ; }
+    cp -f /$f $f
+done
+
+rm -rf .tmp2 ; mkdir .tmp2 ; cd .tmp2
+for i in hy ja ko ta th vi zh_CN.GB2312 zh_TW.Big5 ; do
+    ii=locales-`echo $i | sed 's/\(..\).*/\1/'`
+    rpm2cpio /RPMS/$ii-*.rpm | cpio -id --quiet
+    f=usr/share/locale/$i/LC_CTYPE
+    [ -e $f ] || { echo missing $f in package $ii ; exit 1 ; }
+    cp -f $f ../$f
+    rm -rf *
+done
+cd .. ; rm -rf .tmp2
+
+tar cfj ../$file usr
+
+cd .. ; rm -rf .tmp
+
+ln -sf $file locales.tar.bz2
diff --git a/perl-install/share/locales-skeleton.tar.bz2 b/perl-install/share/locales-skeleton.tar.bz2
new file mode 100644
index 000000000..9e96c72ca
--- /dev/null
+++ b/perl-install/share/locales-skeleton.tar.bz2