5736497319dc5359be4b0f412b6be29587d9ebbc
4 require_once 'connect.db.inc.php';
6 $globals->debug
= 0; // Do not store backtraces.
8 // First build the list provided by the iso codes.
10 exec('isoquery --iso=639', $list);
12 foreach ($list as $key => $item) {
13 $array = explode("\t", $item);
15 $list[$array[0]] = array();
16 foreach (array('iso_639_2t', 'iso_639_1') as $i => $field) {
17 $list[$array[0]][$field] = $array[$i +
1];
21 $res = XDB
::iterator('SELECT iso_639_2b
22 FROM profile_langskill_enum
23 WHERE iso_639_2b IN {?}',
25 while ($item = $res->next()) {
26 $id = $item['iso_639_2b'];
27 XDB
::execute('UPDATE profile_langskill_enum
28 SET iso_639_2t = {?}, iso_639_1 = {?}
29 WHERE iso_639_2b = {?}',
30 $list[$id]['iso_639_2t'], (($list[$id]['iso_639_1']) ?
$list[$id]['iso_639_1'] : null
), $id);
33 /* vim:set et sw=4 sts=4 ts=4: */