Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
openSUSE:12.2:PowerPC
kiwi-config-openSUSE
getcountrydata.ycp
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File getcountrydata.ycp of Package kiwi-config-openSUSE
{ import "Language"; import "Keyboard"; import "Console"; map<string, list> langs = Language::GetLanguagesMap (true); map consolefonts = (map)SCR::Read (.target.yast2, "consolefonts.ycp"); map timezonemap = Language::GetLang2TimezoneMap(true); string dir = getenv("OUTPUTDIR"); foreach (string lang, list ll, langs, { string suffix = ll[2]:""; string fqlanguage = lang + suffix; string kbd = Keyboard::GetKeyboardForLanguage (lang, "us"); // does not really set keyboard, only fills some data Keyboard::SetKeyboard (kbd); // set language for encoding WFM::SetLanguage (fqlanguage); string yast_kbd = kbd + "," + Keyboard::kb_model; list consolefont=consolefonts[fqlanguage]:consolefonts[lang]:[]; string font = consolefont[0]:""; string unicodeMap = consolefont[1]:""; string screenMap = consolefont[2]:""; string magic = consolefont[3]:""; string timezone = timezonemap[lang]:""; string encoding = WFM::GetEncoding(); string contents = sformat ("RC_LANG: %1 CONSOLE_FONT: %2 CONSOLE_SCREENMAP: %3 CONSOLE_UNICODEMAP: %4 CONSOLE_MAGIC: %5 KEYTABLE: %6 YAST_KEYBOARD: %7 COMPOSETABLE: %8 TIMEZONE: %9", fqlanguage, font, screenMap, unicodeMap, magic, Keyboard::keymap, yast_kbd, Keyboard::compose_table, timezone); contents = contents + sformat("\nCONSOLE_ENCODING: %1", encoding); if (lang == "zh_HK") contents = contents + "\nRC_LC_MESSAGES: zh_TW.UTF-8"; map x11data = Keyboard::GetX11KeyData (Keyboard::keymap); foreach (string key, string val, (map<string,string>) x11data, { contents = sformat ("%1\n%2: %3", contents, key, val); }); contents = contents + "\n"; SCR::Write (.target.string, dir + fqlanguage, contents); }); }
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor