Bug 11973 - Fix Armenian language description
authorBernardo Gonzalez Kriegel <bgkriegel@gmail.com>
Thu, 20 Mar 2014 11:45:14 +0000 (08:45 -0300)
committerGalen Charlton <gmc@esilibrary.com>
Sat, 22 Mar 2014 12:48:23 +0000 (12:48 +0000)
This patch fix Armenian language description

To test:
1) Do a fake translation to Armenian,
   mkdir koha-tmpl/intranet-tmpl/prog/hy-Armn
2) Go to Administration > System preferences > I18N/L10N
3) Armenian description looks like the second string in Bug description
4) Apply the patch
5) Run updatedatabase.pl
6) Reload page, now description look as first string in
Bug description (it's the sixth letter, similar to 't')

Ammended patch, wrong column.

Signed-off-by: Holger Meißner <h.meissner.82@web.de>
Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Patch fixes the English sample file for translations and includes
a database update to correct the string in existing installations.
Passes all tests and QA script.

Signed-off-by: Galen Charlton <gmc@esilibrary.com>
installer/data/mysql/en/mandatory/subtag_registry.sql
installer/data/mysql/updatedatabase.pl

index b91aba9..64bcc1b 100755 (executable)
@@ -83,7 +83,7 @@ INSERT INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code)
 VALUES( 'hy','arm');
 
 INSERT INTO language_descriptions(subtag, type, lang, description)
-VALUES ( 'hy', 'language', 'hy', '&#1344;&#1377;&#1397;&#1381;&#1408;&#1383;&#1398;');
+VALUES ( 'hy', 'language', 'hy', 'Հայերեն');
 
 INSERT INTO language_descriptions(subtag, type, lang, description)
 VALUES( 'hy', 'language', 'en', 'Armenian');
index 9039766..63af5cd 100755 (executable)
@@ -8074,6 +8074,15 @@ if ( CheckVersion($DBversion) ) {
     SetVersion($DBversion);
 }
 
+$DBversion = "3.15.00.XXX";
+if ( CheckVersion($DBversion) ) {
+    $dbh->do(q{
+        UPDATE language_descriptions SET description = 'Հայերեն' WHERE subtag = 'hy' AND lang = 'hy';
+    });
+    print "Upgrade to $DBversion done (Bug 11973 - Fix Armenian language description)\n";
+    SetVersion($DBversion);
+}
+
 =head1 FUNCTIONS
 
 =head2 TableExists($table)