模組:R:DGE

維基詞典,自由的多語言詞典


local export = {}

function export.create(frame)
	local args = frame:getParent().args
	local title = args['w'] or mw.title.getCurrentTitle().text
	local title_span = '<span class="polytonic" lang="grc">'..title..'</span>'
	-- replace U+03CC GREEK SMALL LETTER OMICRON WITH TONOS ([[ό]])
	-- with U+1F79 GREEK SMALL LETTER OMICRON WITH OXIA;
	-- the DGE website only accepts the latter.
	-- See [[Template talk:R:DGE#Characters with oxia]].
	local term = (args[1] or title):gsub(mw.ustring.char(0x03CC), mw.ustring.char(0x1F79))
	local termURLCode = mw.uri.encode(term, "PATH")
	local year = os.date("%Y")
	local link = ""
	if termURLCode == '' then
		link = "''[[:en:w:Diccionario Griego–Español|Diccionario Griego–Español]]'' en línea (2006–"..year..")"
	else
		link = "[http://dge.cchs.csic.es/xdge/"..termURLCode..' '..title_span.."] in the ''[[:en:w:Diccionario Griego–Español|Diccionario Griego–Español]]'' en línea (2006–"..year..")"
	end
	return link
end
 
return export