Difference between revisions of "Module:Plain text"

From blackwiki
Jump to navigation Jump to search
blackwiki>Galobtter
(no need for args, remove anything in)
blackwiki>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

Implements {{Plain text}}. Developed for producing short descriptions from text that may have markup, or other stuff that needs removing from short descriptions.

Usage

{{#invoke:Plain text|main|'''[[foo|hah]]''' is '''''[[gah]]'''''}} --> Lua error at line 34: attempt to call global 'strip_apostrophe_markup' (a nil value).

See also


--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