use MDK::Common; my %shifts = ( 'af' => 1, 'am' => 1, 'ar' => 0, 'az' => 1, 'be' => 2, 'bg' => 2, 'bn' => 1, 'br' => 2, 'bs' => 2, 'ca' => 2, 'cs' => 2, 'cy' => 2, 'da' => 2, 'de' => 2, 'el' => 2, 'en_GB' => 2, 'en_US' => 2, 'eo' => 2, 'es' => 2, 'et' => 2, 'eu' => 2, 'fa' => 0, 'fi' => 1, 'fo' => 2, 'fr' => 2, 'ga' => 2, 'gd' => 2, 'gl' => 2, 'gv' => 2, 'he' => 0, 'hi' => 1, 'hr' => 2, 'hu' => 2, 'hy' => 1, 'ia' => 2, 'id' => 1, 'is' => 1, 'it' => 1, 'iu' => 1, 'ja' => 3, 'ka' => 1, 'kn' => 1, 'ko' => 1, 'kw' => 0, 'lo' => 0, 'lt' => 0, 'lv' => 0, 'mi' => 0, 'mk' => 0, 'mn' => 0, 'mr' => 0, 'ms' => 0, 'mt' => 0, 'nb' => 0, 'nl' => 0, 'nn' => 0, 'no' => 0, 'oc' => 0, 'pl' => 0, 'pt_BR' => 0, 'pt' => 0, 'ro' => 0, 'ru' => 0, 'sk' => 0, 'sl' => 0, 'sp' => 0, 'sq' => 0, 'sr' => 0, 'sv' => 0, 'ta' => 1, 'te' => 1, 'tg' => 0, 'th' => 0, 'tr' => 0, 'tt' => 1, 'uk' => 0, 'ur' => 1, 'uz' => 0, 'vi' => 0, 'wa' => 0, 'yi' => 0, 'zh_CN' => 0, 'zh_TW' => 0, ); foreach (glob("lang*.png")) { /lang-(.*)\.png/; exists $shifts{$1} or die "doesn't exist for $_"; $shifts{$1} or next; print "./a.out $_ l.png $shifts{$1}\n"; system("./a.out $_ l.png $shifts{$1}"); renamef('l.png', $_); } er Software Installation ToolsThierry Vignaud [tv]

summary refs log tree commit diff stats

path: root/urpmi.update

blob: b27f7fbaadcae118bb48d7e23153b262add25170 (plain)