Line 0
Link Here
|
0 |
- |
1 |
use Modern::Perl; |
|
|
2 |
use Koha::Installer::Output qw(say_warning say_failure say_success say_info); |
3 |
|
4 |
return { |
5 |
bug_number => "18493", |
6 |
description => "Add missing languages to search options", |
7 |
up => sub { |
8 |
my ($args) = @_; |
9 |
my ( $dbh, $out ) = @$args{qw(dbh out)}; |
10 |
|
11 |
# Greenlandic |
12 |
$dbh->do( |
13 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'kl', 'language', 'Greenlandic', 'NOW()')} |
14 |
) == 1 |
15 |
&& say_success( $out, "Added language_subtag_registry for Greenlandic" ); |
16 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'kl', 'kal')}) |
17 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Greenlandic" ); |
18 |
$dbh->do( |
19 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'kl', 'language', 'en', 'Greenlandic')} |
20 |
) == 1 |
21 |
&& say_success( $out, "Added english language description for Greenlandic" ); |
22 |
$dbh->do( |
23 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'kl', 'language', 'kl', 'Kalaallisut')} |
24 |
) == 1 |
25 |
&& say_success( $out, "Added native language description for Greenlandic" ); |
26 |
|
27 |
# Karelian |
28 |
$dbh->do( |
29 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'krl', 'language', 'Karelian', 'NOW()')} |
30 |
) == 1 |
31 |
&& say_success( $out, "Added language_subtag_registry for Karelian" ); |
32 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'krl', 'krl')}) |
33 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Karelian" ); |
34 |
$dbh->do( |
35 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'krl', 'language', 'en', 'Karelian')} |
36 |
) == 1 |
37 |
&& say_success( $out, "Added english language description for Karelian" ); |
38 |
$dbh->do( |
39 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'krl', 'language', 'krl', 'Karjala')} |
40 |
) == 1 |
41 |
&& say_success( $out, "Added native language description for Karelian" ); |
42 |
|
43 |
# Cornish |
44 |
$dbh->do( |
45 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'kw', 'language', 'Cornish', 'NOW()')} |
46 |
) == 1 |
47 |
&& say_success( $out, "Added language_subtag_registry for Cornish" ); |
48 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'kw', 'cor')}) |
49 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Cornish" ); |
50 |
$dbh->do( |
51 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'kw', 'language', 'en', 'Cornish')} |
52 |
) == 1 |
53 |
&& say_success( $out, "Added english language description for Cornish" ); |
54 |
$dbh->do( |
55 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'kw', 'language', 'kw', 'Kernowek')} |
56 |
) == 1 |
57 |
&& say_success( $out, "Added native language description for Cornish" ); |
58 |
|
59 |
# Burmese |
60 |
$dbh->do( |
61 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'my', 'language', 'Burmese', 'NOW()')} |
62 |
) == 1 |
63 |
&& say_success( $out, "Added language_subtag_registry for Burmese" ); |
64 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'my', 'bur')}) |
65 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Burmese" ); |
66 |
$dbh->do( |
67 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'my', 'language', 'en', 'Burmese')} |
68 |
) == 1 |
69 |
&& say_success( $out, "Added english language description for Burmese" ); |
70 |
$dbh->do( |
71 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'my', 'language', 'my', 'မြန်မာစာ')} |
72 |
) == 1 |
73 |
&& say_success( $out, "Added native language description for Burmese" ); |
74 |
|
75 |
# Punjabi |
76 |
$dbh->do( |
77 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'pa', 'language', 'Punjabi', 'NOW()')} |
78 |
) == 1 |
79 |
&& say_success( $out, "Added language_subtag_registry for Punjabi" ); |
80 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'pa', 'pan')}) |
81 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Punjabi" ); |
82 |
$dbh->do( |
83 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'pa', 'language', 'en', 'Punjabi')} |
84 |
) == 1 |
85 |
&& say_success( $out, "Added english language description for Punjabi" ); |
86 |
$dbh->do( |
87 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'pa', 'language', 'pa', 'پنجابی')} |
88 |
) == 1 |
89 |
&& say_success( $out, "Added native language description for Punjabi" ); |
90 |
|
91 |
# Pashto |
92 |
$dbh->do( |
93 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'ps', 'language', 'Pashto', 'NOW()')} |
94 |
) == 1 |
95 |
&& say_success( $out, "Added language_subtag_registry for Pashto" ); |
96 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'ps', 'pus')}) |
97 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Pashto" ); |
98 |
$dbh->do( |
99 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'ps', 'language', 'en', 'Pashto')} |
100 |
) == 1 |
101 |
&& say_success( $out, "Added english language description for Pashto" ); |
102 |
$dbh->do( |
103 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'ps', 'language', 'ps', 'پښتو')} |
104 |
) == 1 |
105 |
&& say_success( $out, "Added native language description for Pashto" ); |
106 |
|
107 |
# Finnish Kalo |
108 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES( 'rmf', 'rmf')}) |
109 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Finnish Kalo" ); |
110 |
$dbh->do( |
111 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES( 'rmf', 'language', 'en', 'Finnish Kalo')} |
112 |
) == 1 |
113 |
&& say_success( $out, "Added english language description for Finnish Kalo" ); |
114 |
$dbh->do( |
115 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES( 'rmf', 'language', 'fi', 'Suomen romanikieli')} |
116 |
) == 1 |
117 |
&& say_success( $out, "Added native language description for Finnish Kalo" ); |
118 |
$dbh->do( |
119 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES( 'rmf', 'language', 'rmf', 'Fíntika Rómma')} |
120 |
) == 1 |
121 |
&& say_success( $out, "Added native language description for Finnish Kalo" ); |
122 |
|
123 |
# Akkala Sami |
124 |
$dbh->do( |
125 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'sia', 'language', 'Akkala Sami', 'NOW()')} |
126 |
) == 1 |
127 |
&& say_success( $out, "Added language_subtag_registry for Akkala Sami" ); |
128 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'sia', 'sia')}) |
129 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Akkala Sami" ); |
130 |
$dbh->do( |
131 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sia', 'language', 'en', 'Akkala Sami')} |
132 |
) == 1 |
133 |
&& say_success( $out, "Added english language description for Akkala Sami" ); |
134 |
$dbh->do( |
135 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sia', 'language', 'sia', 'ču´kksuâlis')} |
136 |
) == 1 |
137 |
&& say_success( $out, "Added native language description for Akkala Sami" ); |
138 |
|
139 |
# Kildin Sami |
140 |
$dbh->do( |
141 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'sjd', 'language', 'Kildin Sami', 'NOW()')} |
142 |
) == 1 |
143 |
&& say_success( $out, "Added language_subtag_registry for Kildin Sami" ); |
144 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'sjd', 'sjd')}) |
145 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Kildin Sami" ); |
146 |
$dbh->do( |
147 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sjd', 'language', 'en', 'Kildin Sami')} |
148 |
) == 1 |
149 |
&& say_success( $out, "Added english language description for Kildin Sami" ); |
150 |
$dbh->do( |
151 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sjd', 'language', 'sjd', 'Кӣллт са̄мь кӣлл')} |
152 |
) == 1 |
153 |
&& say_success( $out, "Added native language description for Kildin Sami" ); |
154 |
|
155 |
# Ter Sami |
156 |
$dbh->do( |
157 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'sjt', 'language', 'Ter Sami', 'NOW()')} |
158 |
) == 1 |
159 |
&& say_success( $out, "Added language_subtag_registry for Ter Sami" ); |
160 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'sjt', 'sjt')}) |
161 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Ter Sami" ); |
162 |
$dbh->do( |
163 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sjt', 'language', 'en', 'Ter Sami')} |
164 |
) == 1 |
165 |
&& say_success( $out, "Added english language description for Ter Sami" ); |
166 |
$dbh->do( |
167 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sjt', 'language', 'sjt', 'saa´mekiill')} |
168 |
) == 1 |
169 |
&& say_success( $out, "Added native language description for Ter Sami" ); |
170 |
|
171 |
# Pite Sami |
172 |
$dbh->do( |
173 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'sje', 'language', 'Pite Sami', 'NOW()')} |
174 |
) == 1 |
175 |
&& say_success( $out, "Added language_subtag_registry for Pite Sami" ); |
176 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'sje', 'sje')}) |
177 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Pite Sami" ); |
178 |
$dbh->do( |
179 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sje', 'language', 'en', 'Pite Sami')} |
180 |
) == 1 |
181 |
&& say_success( $out, "Added english language description for Pite Sami" ); |
182 |
$dbh->do( |
183 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sje', 'language', 'sje', 'Bidumsámegiella')} |
184 |
) == 1 |
185 |
&& say_success( $out, "Added native language description for Pite Sami" ); |
186 |
|
187 |
# Kemi Sami |
188 |
$dbh->do( |
189 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'sjk', 'language', 'Kemi Sami', 'NOW()')} |
190 |
) == 1 |
191 |
&& say_success( $out, "Added language_subtag_registry for Kemi Sami" ); |
192 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'sjk', 'sjk')}) |
193 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Kemi Sami" ); |
194 |
$dbh->do( |
195 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sjk', 'language', 'en', 'Kemi Sami')} |
196 |
) == 1 |
197 |
&& say_success( $out, "Added english language description for Kemi Sami" ); |
198 |
$dbh->do( |
199 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sjk', 'language', 'sjk', 'samääškiela')} |
200 |
) == 1 |
201 |
&& say_success( $out, "Added native language description for Kemi Sami" ); |
202 |
|
203 |
# Ume Sami |
204 |
$dbh->do( |
205 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'sju', 'language', 'Ume Sami', 'NOW()')} |
206 |
) == 1 |
207 |
&& say_success( $out, "Added language_subtag_registry for Ume Sami" ); |
208 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'sju', 'sju')}) |
209 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Ume Sami" ); |
210 |
$dbh->do( |
211 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sju', 'language', 'en', 'Ume Sami')} |
212 |
) == 1 |
213 |
&& say_success( $out, "Added english language description for Ume Sami" ); |
214 |
$dbh->do( |
215 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sju', 'language', 'sju', 'Ubmejensámien giella')} |
216 |
) == 1 |
217 |
&& say_success( $out, "Added native language description for Ume Sami" ); |
218 |
|
219 |
# Southern Sami |
220 |
$dbh->do( |
221 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'sma', 'language', 'Southern Sami', 'NOW()')} |
222 |
) == 1 |
223 |
&& say_success( $out, "Added language_subtag_registry for Southern Sami" ); |
224 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'sma', 'sma')}) |
225 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Southern Sami" ); |
226 |
$dbh->do( |
227 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sma', 'language', 'en', 'Southern Sami')} |
228 |
) == 1 |
229 |
&& say_success( $out, "Added english language description for Southern Sami" ); |
230 |
$dbh->do( |
231 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sma', 'language', 'sma', 'Åarjelsaemien gïele')} |
232 |
) == 1 |
233 |
&& say_success( $out, "Added native language description for Southern Sami" ); |
234 |
|
235 |
# Northern Sami |
236 |
$dbh->do( |
237 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'sme', 'language', 'Northern Sami', 'NOW()')} |
238 |
) == 1 |
239 |
&& say_success( $out, "Added language_subtag_registry for Northern Sami" ); |
240 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'sme', 'sme')}) |
241 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Northern Sami" ); |
242 |
$dbh->do( |
243 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sme', 'language', 'en', 'Northern Sami')} |
244 |
) == 1 |
245 |
&& say_success( $out, "Added english language description for Northern Sami" ); |
246 |
$dbh->do( |
247 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sme', 'language', 'fi', 'pohjoissaame')} |
248 |
) == 1 |
249 |
&& say_success( $out, "Added native language description for Northern Sami" ); |
250 |
$dbh->do( |
251 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sme', 'language', 'sv', 'Nordsamiska')} |
252 |
) == 1 |
253 |
&& say_success( $out, "Added native language description for Northern Sami" ); |
254 |
$dbh->do( |
255 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sme', 'language', 'sme', 'davvisámegiella')} |
256 |
) == 1 |
257 |
&& say_success( $out, "Added native language description for Northern Sami" ); |
258 |
|
259 |
# Sami languages |
260 |
$dbh->do( |
261 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'smi', 'language', 'Sami languages', 'NOW()')} |
262 |
) == 1 |
263 |
&& say_success( $out, "Added language_subtag_registry for Sami languages" ); |
264 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'smi', 'smi')}) |
265 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Sami languages" ); |
266 |
$dbh->do( |
267 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'smi', 'language', 'en', 'Sami languages')} |
268 |
) == 1 |
269 |
&& say_success( $out, "Added english language description for Sami languages" ); |
270 |
$dbh->do( |
271 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'smi', 'language', 'fi', 'saamelaiskielet')} |
272 |
) == 1 |
273 |
&& say_success( $out, "Added native language description for Sami languages" ); |
274 |
$dbh->do( |
275 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'smi', 'language', 'sv', 'Samiska')} |
276 |
) == 1 |
277 |
&& say_success( $out, "Added native language description for Sami languages" ); |
278 |
$dbh->do( |
279 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'smi', 'language', 'smi', 'Saami')} |
280 |
) == 1 |
281 |
&& say_success( $out, "Added native language description for Sami languages" ); |
282 |
|
283 |
# Lule Sami |
284 |
$dbh->do( |
285 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'smj', 'language', 'Lule Sami', 'NOW()')} |
286 |
) == 1 |
287 |
&& say_success( $out, "Added language_subtag_registry for Lule Sami" ); |
288 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'smj', 'smj')}) |
289 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Lule Sami" ); |
290 |
$dbh->do( |
291 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'smj', 'language', 'en', 'Lule Sami')} |
292 |
) == 1 |
293 |
&& say_success( $out, "Added english language description for Lule Sami" ); |
294 |
$dbh->do( |
295 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'smj', 'language', 'smj', 'julevsámegiella')} |
296 |
) == 1 |
297 |
&& say_success( $out, "Added native language description for Lule Sami" ); |
298 |
|
299 |
# Inari Sami |
300 |
$dbh->do( |
301 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'smn', 'language', 'Inari Sami', 'NOW()')} |
302 |
) == 1 |
303 |
&& say_success( $out, "Added language_subtag_registry for Inari Sami" ); |
304 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'smn', 'smn')}) |
305 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Inari Sami" ); |
306 |
$dbh->do( |
307 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'smn', 'language', 'en', 'Inari Sami')} |
308 |
) == 1 |
309 |
&& say_success( $out, "Added english language description for Inari Sami" ); |
310 |
$dbh->do( |
311 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'smn', 'language', 'smn', 'anarâškielâ')} |
312 |
) == 1 |
313 |
&& say_success( $out, "Added native language description for Inari Sami" ); |
314 |
|
315 |
# Skolt Sami |
316 |
$dbh->do( |
317 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'sms', 'language', 'Skolt Sami', 'NOW()')} |
318 |
) == 1 |
319 |
&& say_success( $out, "Added language_subtag_registry for Skolt Sami" ); |
320 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'sms', 'sms')}) |
321 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Skolt Sami" ); |
322 |
$dbh->do( |
323 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sms', 'language', 'en', 'Skolt Sami')} |
324 |
) == 1 |
325 |
&& say_success( $out, "Added english language description for Skolt Sami" ); |
326 |
$dbh->do( |
327 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sms', 'language', 'sms', 'sääʹmǩiõll')} |
328 |
) == 1 |
329 |
&& say_success( $out, "Added native language description for Skolt Sami" ); |
330 |
|
331 |
# Somali |
332 |
$dbh->do( |
333 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'so', 'language', 'Somali', 'NOW()')} |
334 |
) == 1 |
335 |
&& say_success( $out, "Added language_subtag_registry for Somali" ); |
336 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'so', 'som')}) |
337 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Somali" ); |
338 |
$dbh->do( |
339 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'so', 'language', 'en', 'Somali')} |
340 |
) == 1 |
341 |
&& say_success( $out, "Added english language description for Somali" ); |
342 |
$dbh->do( |
343 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'so', 'language', 'so', 'Af-Soomaali')} |
344 |
) == 1 |
345 |
&& say_success( $out, "Added native language description for Somali" ); |
346 |
|
347 |
# Sotho |
348 |
$dbh->do( |
349 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'st', 'language', 'Sotho', 'NOW()')} |
350 |
) == 1 |
351 |
&& say_success( $out, "Added language_subtag_registry for Sotho" ); |
352 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'st', 'sot')}) |
353 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Sotho" ); |
354 |
$dbh->do( |
355 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'st', 'language', 'en', 'Sotho')} |
356 |
) == 1 |
357 |
&& say_success( $out, "Added english language description for Sotho" ); |
358 |
$dbh->do( |
359 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'st', 'language', 'st', 'Sesotho')} |
360 |
) == 1 |
361 |
&& say_success( $out, "Added native language description for Sotho" ); |
362 |
|
363 |
# Votic |
364 |
$dbh->do( |
365 |
q{INSERT IGNORE INTO language_subtag_registry( subtag, type, description, added) VALUES ( 'vot', 'language', 'Votic', 'NOW()')} |
366 |
) == 1 |
367 |
&& say_success( $out, "Added language_subtag_registry for Votic" ); |
368 |
$dbh->do(q{INSERT IGNORE INTO language_rfc4646_to_iso639(rfc4646_subtag,iso639_2_code) VALUES ( 'vot', 'vot')}) |
369 |
== 1 && say_success( $out, "Added language_rfc4646_to_iso639 for Votic" ); |
370 |
$dbh->do( |
371 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'vot', 'language', 'en', 'Votic')} |
372 |
) == 1 |
373 |
&& say_success( $out, "Added english language description for Votic" ); |
374 |
$dbh->do( |
375 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'vot', 'language', 'vot', 'vađđa ceeli')} |
376 |
) == 1 |
377 |
&& say_success( $out, "Added native language description for Votic" ); |
378 |
|
379 |
$dbh->do( |
380 |
q{UPDATE language_descriptions SET description = 'Latviešu valoda' WHERE subtag = 'lv' AND type = 'language' AND lang = 'lv'} |
381 |
) == 1 |
382 |
&& say_success( $out, "Updated native lv language description from Latvija to Latviešu valoda" ); |
383 |
|
384 |
$dbh->do( |
385 |
q{UPDATE language_descriptions SET description = 'Lietuvių kalba' WHERE subtag = 'lt' AND type = 'language' AND lang = 'lt'} |
386 |
) == 1 |
387 |
&& say_success( $out, "Updated native lt language description from Lietuvių to Lietuvių kalba" ); |
388 |
|
389 |
$dbh->do( |
390 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'grc', 'language', 'grc', 'Ἑλληνική')} |
391 |
) == 1 |
392 |
&& say_success( $out, "Added native language description for Ancient Greek" ); |
393 |
|
394 |
$dbh->do( |
395 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'eo', 'language', 'eo', 'Esperanto')} |
396 |
) == 1 |
397 |
&& say_success( $out, "Added native language description for Esperanto" ); |
398 |
|
399 |
$dbh->do( |
400 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'sa', 'language', 'sa', 'saṃskṛtam')} |
401 |
) == 1 |
402 |
&& say_success( $out, "Added native language description for Sanskrit" ); |
403 |
|
404 |
$dbh->do( |
405 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'ga', 'language', 'ga', 'Gaeilge')} |
406 |
|
407 |
) == 1 && say_success( $out, "Added native language description for Irish Gaelic" ); |
408 |
|
409 |
$dbh->do( |
410 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'bs', 'language', 'bn', 'Bosanski')} |
411 |
) == 1 |
412 |
&& say_success( $out, "Added native language description for Bosnian" ); |
413 |
|
414 |
$dbh->do( |
415 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'kk', 'language', 'kk', 'қазақ тілі')} |
416 |
) && say_success( $out, "Added native language description for Kazakh" ); |
417 |
|
418 |
$dbh->do( |
419 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'bo', 'language', 'bo', 'ལྷ་སའི་སྐད་')} |
420 |
) == 1 |
421 |
&& say_success( $out, "Added native language description of Standard Tibetan" ); |
422 |
|
423 |
$dbh->do( |
424 |
q{INSERT IGNORE INTO language_descriptions(subtag, type, lang, description) VALUES ( 'cy', 'language', 'cy', 'Cymraeg')} |
425 |
) && say_success( $out, "Added native language description of Welsh" ); |
426 |
} |
427 |
} |