From c3410468672da47e2f5a057e755c5351a64bd201 Mon Sep 17 00:00:00 2001 From: Funda Wang Date: Thu, 5 Feb 2009 13:43:06 +0000 Subject: set scim-thai as default IM for Thai --- perl-install/lang.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 8499ea6ec..46d0dcbf1 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -649,6 +649,7 @@ my %IM_config = am => sub { qw(scim-tables) }, ja => sub { qw(scim-anthy scim-input-pad scim-tomoe) }, ko => sub { qw(scim-hangul) }, + th => sub { qw(scim-thai) }, vi => sub { qw(scim-m17n) }, zh => sub { qw(scim-pinyin scim-tables scim-chewing) }, }, @@ -658,13 +659,14 @@ my %IM_config = GTK_IM_MODULE => 'scim-bridge', XIM_PROGRAM => 'scim -d', XMODIFIERS => '@im=SCIM', - default_for_lang => 'am ja ko vi zh_CN zh_TW', + default_for_lang => 'am ja ko th vi zh_CN zh_TW', packages => { common => sub { if_($is_kde3, 'scim-bridge-qt3'), if_($is_kde4, 'scim-bridge-qt4') }, generic => sub { qw(scim-m17n scim-tables) }, am => sub { qw(scim-tables) }, ja => sub { qw(scim-anthy scim-input-pad scim-tomoe) }, ko => sub { qw(scim-hangul) }, + th => sub { qw(scim-thai) }, vi => sub { qw(scim-m17n) }, zh => sub { qw(scim-pinyin scim-tables scim-chewing) }, }, @@ -691,6 +693,7 @@ my %IM_config = am => sub { qw(skim-scim-tables) }, ja => sub { qw(skim-scim-anthy scim-input-pad scim-tomoe) }, ko => sub { qw(scim-hangul-skim) }, + th => sub { qw(scim-thai) }, vi => sub { qw(skim scim-m17n) }, zh => sub { qw(skim-scim-pinyin skim-scim-tables scim-chewing) }, }, -- cgit v1.2.1