Module:Plain text: Difference between revisions

From escforumwiki
Jump to navigation Jump to search
en>Galobtter
no need for args, remove anything in
en>Galobtter
copy from Module:Citation/CS1/COinS, see its history for attribution - strip italics and bold
Line 2: Line 2:
--removes anything enclosed in tags and files
--removes anything enclosed in tags and files
local p = {}
local p = {}
--copied from Module:Citation/CS1/COinS
function p.strip_apostrophe_markup (argument)
if argument:find ( "''", 1, true ) == nil then -- Is there at least one double apostrophe?  If not, exit.
return argument
end
while true do
if argument:find ( "'''''", 1, true ) then -- bold italic (5)
argument=argument:gsub("%'%'%'%'%'", ""); -- remove all instances of it
elseif argument:find ( "''''", 1, true ) then -- italic start and end without content (4)
argument=argument:gsub("%'%'%'%'", "");
elseif argument:find ( "'''", 1, true ) then -- bold (3)
argument=argument:gsub("%'%'%'", "");
elseif argument:find ( "''", 1, true ) then -- italic (2)
argument=argument:gsub("%'%'", "");
else
break;
end
end
return argument; -- done
end
function p.main(frame)
function p.main(frame)
text = frame.args[1]
text = frame.args[1]
Line 9: Line 32:
text = mw.ustring.gsub (text, '%[', '') --then strip out remaining [ and ]
text = mw.ustring.gsub (text, '%[', '') --then strip out remaining [ and ]
text = mw.ustring.gsub (text, '%]', '')
text = mw.ustring.gsub (text, '%]', '')
strip_apostrophe_markup(text)
return text
return text
end
end
return p
return p

Revision as of 15:22, 13 April 2018

Documentation for this module may be created at Module:Plain text/doc

--converts text with wikilinks to plain text, e.g "[[foo|gah]] is [[bar]]" to "gah is bar"
--removes anything enclosed in tags and files
local p = {}
--copied from Module:Citation/CS1/COinS

function p.strip_apostrophe_markup (argument)
	if argument:find ( "''", 1, true ) == nil then								-- Is there at least one double apostrophe?  If not, exit.
		return argument
	end

	while true do
		if argument:find ( "'''''", 1, true ) then								-- bold italic (5)
			argument=argument:gsub("%'%'%'%'%'", "");							-- remove all instances of it
		elseif argument:find ( "''''", 1, true ) then							-- italic start and end without content (4)
			argument=argument:gsub("%'%'%'%'", "");
		elseif argument:find ( "'''", 1, true ) then							-- bold (3)
			argument=argument:gsub("%'%'%'", "");
		elseif argument:find ( "''", 1, true ) then								-- italic (2)
			argument=argument:gsub("%'%'", "");
		else
			break;
		end
	end
	return argument;															-- done
end

function p.main(frame)
	text = frame.args[1]
	text = mw.ustring.gsub (text, '<.->.-<.->', '') --strip out flags, plus any other tags, e.g footnotes
	text = mw.ustring.gsub (text, '%[%[File:.-%]%]', '') --strip out files
	text = mw.ustring.gsub (text, '%[%[.-|', '') --strip out piped link text
	text = mw.ustring.gsub (text, '%[', '') --then strip out remaining [ and ]
	text = mw.ustring.gsub (text, '%]', '')
	strip_apostrophe_markup(text)
	return text
end

return p