--[=[ 
2019.02.25. Sarri.greek - Καλείται από Template [[Πρότυπο:recognizeaffix]].
	χαρακτηρισμός προσφυμάτων σε σύνθετες λέξεις από τα ενωτικά τους: ...- (πρόθημα), -...- (ένθημα) and -... (επίθημα)
	με ευχαριστίες στον User:Erutuon στο en.wiktionary
	labelling of affixes from their hyphens at compounds: ...- (prefix), -...- (interfix) and -... (suffix)
	thanks to User:Erutuon at en.wiktionary
 2019.11.12. invoke from Template & invoke direct standalone 
 2019.12.27. function pageminusprefix For creating sorting base word in Categories of prefixes ([[Πρότυπο:π]] FAILED)
]=]--

local p = {}

function p.affix(frame)
	local term = frame.args[1] or frame:getParent().args[1] -- {{#invoke:recognizeaffix|affix|<a word>}}

	if term:sub(1, 1) == '-' then
		if term:sub(-1) == '-' then
			return 'ένθημα'
		else
			return 'επίθημα'
		end
	elseif term:sub(-1) == '-' then
		return 'πρόθημα'
	else
		return 'συνθετικό'
	end
end

-- take away prefix, produce the prototype word (which will be sorted in Categories)
-- [[Template:pageminusprefix]]
function p.pageminusprefix(frame)
	local prefix = frame.args[1] or frame:getParent().args[1] -- {{#invoke:recognizeaffix|pageminusprefix|<prefix>}}
	--if prefix:sub(-1) == '-' then string.len(term) end
--	args = frame:getParent().args --  for Template only
--	args = frame.args -- for invoke only
	PAGENAME = mw.title.getCurrentTitle().text
	local lemma = PAGENAME:match( "^%s*(.-)%s*$" )
	local lemma2 = ''
	if lemma == '' then lemma = PAGENAME:match( "^%s*(.-)%s*$" ) end
--	if lemma.namespace == 0 then		-- only in main namespace, not of Categories
		if prefix:sub(-1) == '-' then
			lemma2 = mw.ustring.sub(lemma, string.len(prefix),-1)
		end
--	end --close if namespace = 0
	return lemma2
end

return p