User:ArielGlenn/sidebar.js

function shortcutsInit { shortcutsAddLink ('REQ:TTBC(el)', 'Category:Translations to be checked (Greek)'); shortcutsAddLink ('REQ:Transl(el)', 'Category:Translation requests (Greek)'); shortcutsAddLink ('REQ:Gender(el)', 'Category:Greek nouns lacking gender'); shortcutsAddLink ('REQ:TransWiki(el)', 'Special:Whatlinkshere/User:Dmcdevit/TWGreek'); shortcutsAddLink ('REQ:Articles(el)', 'Wiktionary:Requested articles:Greek');

shortcutsStartSection ('Refs');

shortcutsAddLink ('WT:AEL', 'WT:AEL'); shortcutsAddLink ('Conj templates', 'Category:Greek_conjugation_templates'); shortcutsAddLink ('Decl templates', 'Category:Greek_declension_templates'); shortcutsAddLink ('Infl templates', 'Category:Greek_inflection_templates'); shortcutsAddLink ('WT:CFI', 'WT:CFI'); shortcutsAddLink ('WT:ELE', 'WT:ELE');

shortcutsStartSection ('Tools');

// stolen from User:Connel MacKenzei/sidebar.js

// get page title var pagetitle = document.getElementById('content').getElementsByTagName('h1').item(0).firstChild.nodeValue; if (!pagetitle) pagetitle = wgPageName; if (pagetitle.search(/Search/) != -1) { pagetitle = document.getElementById('searchInput').value; } pagetitle = pagetitle.replace(/Επεξεργασία /g, ""); var pageexternal = pagetitle.replace(/\ /g, "_"); var pageext =     pagetitle.replace(/\ /g, "+");

// end stolen bit

if ( pagetitle.search(/:/) != -1 ) { shortcutsAddLink ('Etym dict','http://www.etymonline.com/index.php'); shortcutsAddLink ('in.gr','http://www.in.gr/dictionary/'); shortcutsAddLink ('ΛΚΝ','http://www.greek-language.gr/greekLang/modern_greek/tools/lexica/triantafyllides/index.html'); } else { shortcutsAddLink ('Etym dict','http://www.etymonline.com/index.php?search='+pageext+'&searchmode=none'); shortcutsAddLink ('in.gr','http://www.in.gr/dictionary/lookup.asp?word='+pageext); shortcutsAddLink ('ΛΚΝ','http://www.greek-language.gr/greekLang/modern_greek/tools/lexica/triantafyllides/search.html?lq='+pageext); shortcutsAddLink ('ΒΛ','http://el.wiktionary.org/wiki/'+pageext); } shortcutsAddLink ('Slang','http://www.slang.gr/'); shortcutsAddLink ('Οδηγός IPA','http://el.wiktionary.org/wiki/Βικιλεξικό:Οδηγός προφοράς');

shortcutsStartSection ('Διασκέδαση'); shortcutsAddLink ('Τυχαία σελίδα','http://connelm.homelinux.com/cgi-bin/randompage?lang=Greek'); }