Module:Respell - Revision history

Nardog: simpler

2019-08-14T17:08:51Z

simpler

← Previous revision		Revision as of 17:08, 14 August 2019
Line 7:		Line 7:
	-- Compatibility: Ignore arguments that only contain an apostrophe		-- Compatibility: Ignore arguments that only contain an apostrophe
	if v ~= '' and v ~= "'" then		if v ~= '' and v ~= "'" then
	if ret[#ret] ~~and not (~~		if ret[#ret]
	ret[#ret]:find('_')		and not (ret[#ret]:find('_') or ret[#ret]:find('%-%)?$'))
	or ~~ret[#ret]~~:find('%-$')		and not (v:find('_') or v:find('^%(?%-'))
	or ret[#ret]:find('%-%)$')
	)
	and not (v:find('_') or v:find('^%-') or v:find('^%(%-'))
	then		then
	table.insert(ret, '-')		table.insert(ret, '-')

Nardog: support optional syllables

2019-08-13T15:23:40Z

support optional syllables

← Previous revision		Revision as of 15:23, 13 August 2019
Line 7:		Line 7:
	-- Compatibility: Ignore arguments that only contain an apostrophe		-- Compatibility: Ignore arguments that only contain an apostrophe
	if v ~= '' and v ~= "'" then		if v ~= '' and v ~= "'" then
	if ret[#ret] and not (ret[#ret]:find('_') or ret[#ret]:find('%-$'))		if ret[#ret] and not (
			ret[#ret]:find('_')
			or ret[#ret]:find('%-$')
	~~and not (v:find('_')~~ or v:find('^%-'))		or ret[#ret]:find('%-%)$')
			)
			and not (v:find('_') or v:find('^%-') or v:find('^%(%-'))
	then		then
	table.insert(ret, '-')		table.insert(ret, '-')

Nardog: recognize parentheses

2019-08-13T14:43:34Z

recognize parentheses

← Previous revision		Revision as of 14:43, 13 August 2019
Line 12:		Line 12:
	table.insert(ret, '-')		table.insert(ret, '-')
	end		end
	if v:find('^%u+$') then		if v:find('^[%u%(%)]+$') then
	v = '<span style="font-size:90%">' .. v .. '</span>'		v = '<span style="font-size:90%">' .. v .. '</span>'
	end		end

Nardog: disabling link is now done by link=no because people were inadvertently putting blank parameters at the end

2019-03-16T13:30:04Z

disabling link is now done by link=no because people were inadvertently putting blank parameters at the end

← Previous revision		Revision as of 13:30, 16 March 2019
Line 3:		Line 3:
	function p._main(args)		function p._main(args)
	local ret = {}		local ret = {}
	local link
	for i, v in ipairs(args) do		for i, v in ipairs(args) do
	v = mw.text.trim(v)		v = mw.text.trim(v)
Line 18:		Line 17:
	table.insert(ret, v)		table.insert(ret, v)
	end		end
	-- For documentation: Blank parameter at the end suppresses the link
	if not args[i + 1] and v ~= '' then link = true end
	end		end
	ret = '<i title="English pronunciation respelling">' ..		ret = '<i title="English pronunciation respelling">' ..
	table.concat(ret):gsub('_', ' ')		table.concat(ret):gsub('_', ' ')
	~~:gsub(' %-', ' -⁠')~~ -- Avoid dangling hyphens		-- Avoid dangling hyphens
			:gsub(' %-', ' -⁠')
	:gsub('^%-', '-⁠')		:gsub('^%-', '-⁠')
	.. '</i>'		.. '</i>'
	~~ret~~ = ~~link~~ ~~and~~ '[[Help:Pronunciation respelling key\|' .. ret .. ']]' ~~or ret~~		if args.link ~= 'no' then
			ret = '[[Help:Pronunciation respelling key\|' .. ret .. ']]'
			end
	return ret		return ret
	end		end

Nardog: avoid dangling hyphens

2019-01-18T00:39:30Z

avoid dangling hyphens

← Previous revision		Revision as of 00:39, 18 January 2019
Line 22:		Line 22:
	end		end
	ret = '<i title="English pronunciation respelling">' ..		ret = '<i title="English pronunciation respelling">' ..
	table.concat(ret):gsub('_', ' ') ~~.. '</i>'~~		table.concat(ret):gsub('_', ' ')
			:gsub(' %-', ' -⁠') -- Avoid dangling hyphens
			:gsub('^%-', '-⁠')
			.. '</i>'
	ret = link and '[[Help:Pronunciation respelling key\|' .. ret .. ']]' or ret		ret = link and '[[Help:Pronunciation respelling key\|' .. ret .. ']]' or ret
	return ret		return ret

Nardog: refine

2019-01-17T23:58:30Z

refine

← Previous revision		Revision as of 23:58, 17 January 2019
Line 1:		Line 1:
	local p = {}		local p = {}
	local getArgs = require('Module:Arguments').getArgs

	function p._main(args)		function p._main(args)
	local ret = {}		local ret = {}
	local ~~hasUnsc = {}~~		local link
	local j = 0

	for i, v in ipairs(args) do		for i, v in ipairs(args) do
			v = mw.text.trim(v)
	-- Compatibility: Ignore arguments that only contain an apostrophe		-- Compatibility: Ignore arguments that only contain an apostrophe
	if ~~v and~~ v ~= '' and v ~= "'" then		if v ~= '' and v ~= "'" then
	~~hasUnsc~~[i] = ~~mw.ustring.~~find(v, '_')		if ret[#ret] and not (ret[#ret]:find('_') or ret[#ret]:find('%-$'))
			and not (v:find('_') or v:find('^%-'))
⚫	if ~~hasUnsc[i]~~ then
		⚫	then
	v = mw.ustring.gsub(v, '_', ' ')
		⚫	table.insert(ret, '-')
⚫	~~else~~
		⚫	end
	if mw.ustring.find(v, '%u') and v == mw.ustring.upper(v) then
		⚫	if v:find('^%u+$') then
	local span = mw.html.create('span')
	~~:css(~~'font-size', '~~90%~~')		v = '<span style="font-size:90%">' .. v .. '</span>'
	:wikitext(v)
	v = tostring(span)
⚫	end
⚫	if ~~i ~= 1 and~~ not ~~hasUnsc~~[i - 1] and v ~= '-' then
⚫	table.insert(ret, '-')
	end
	end		end
	table.insert(ret, v)		table.insert(ret, v)
	end		end
			-- For documentation: Blank parameter at the end suppresses the link
	j = i
		⚫	if not args[i + 1] and v ~= '' then link = true end
	end

	-- Create <i title="...">...</i>
	local italic = mw.html.create('i')
⚫	~~:attr('title',~~ 'English pronunciation respelling')
	:wikitext(table.concat(ret))
	ret = tostring(italic)

	-- For documentation: Disable linking by adding a blank parameter at the end
	if args[j] ~= '' then
⚫	ret = ~~string.format(~~'[[Help:Pronunciation respelling key\|%s]]', ret)
	end		end
		⚫	ret = '<i title="English pronunciation respelling">' ..

			table.concat(ret):gsub('_', ' ') .. '</i>'
		⚫	ret = link and '[[Help:Pronunciation respelling key\|' .. ret .. ']]' or ret
	return ret		return ret
	end		end

	function p.main(frame)		function p.main(frame)
		⚫	return p._main(frame:getParent().args)
	local args = getArgs(frame, {removeBlanks = false})
⚫	return p._main(args)
	end		end

Nardog: abandon small/bold, instead lower stressed syllables per discussion at Template talk:Respell

2017-12-28T14:53:35Z

abandon small/bold, instead lower stressed syllables per discussion at Template talk:Respell

← Previous revision		Revision as of 14:53, 28 December 2017
Line 15:		Line 15:
	else		else
	if mw.ustring.find(v, '%u') and v == mw.ustring.upper(v) then		if mw.ustring.find(v, '%u') and v == mw.ustring.upper(v) then
	v = ~~string~~.~~format~~("''~~'%s'''", v~~)		local span = mw.html.create('span')
			:css('font-size', '90%')
			:wikitext(v)
			v = tostring(span)
	end		end
	if i ~= 1 and not hasUnsc[i - 1] and v ~= '-' then		if i ~= 1 and not hasUnsc[i - 1] and v ~= '-' then
Line 26:		Line 29:
	end		end

	-- Create <~~small~~ title="..."~~><i~~>...</i~~></small~~>		-- Create <i title="...">...</i>
	local ~~small~~ = mw.html.create('~~small~~')		local italic = mw.html.create('i')
	small
	:attr('title', 'English pronunciation respelling')		:attr('title', 'English pronunciation respelling')
	:tag('i')
	:wikitext(table.concat(ret))		:wikitext(table.concat(ret))
	ret = tostring(~~small~~)		ret = tostring(italic)

	-- For documentation: Disable linking by adding a blank parameter at the end		-- For documentation: Disable linking by adding a blank parameter at the end

Nardog: support '-'

2017-08-12T17:12:42Z

support '-'

← Previous revision		Revision as of 17:12, 12 August 2017
Line 17:		Line 17:
	v = string.format("'''%s'''", v)		v = string.format("'''%s'''", v)
	end		end
	if i ~= 1 and not hasUnsc[i - 1] then		if i ~= 1 and not hasUnsc[i - 1] and v ~= '-' then
	table.insert(ret, '-')		table.insert(ret, '-')
	end		end

Nardog: a syllable must contain an uppercase letter to be emphasized

2017-08-04T03:11:39Z

a syllable must contain an uppercase letter to be emphasized

← Previous revision		Revision as of 03:11, 4 August 2017
Line 14:		Line 14:
	v = mw.ustring.gsub(v, '_', ' ')		v = mw.ustring.gsub(v, '_', ' ')
	else		else
	if v == mw.ustring.upper(v) then		if mw.ustring.find(v, '%u') and v == mw.ustring.upper(v) then
	v = string.format("'''%s'''", v)		v = string.format("'''%s'''", v)
	end		end

Nardog: simplify code

2017-06-23T15:40:19Z

simplify code

← Previous revision		Revision as of 15:40, 23 June 2017
Line 3:		Line 3:

	function p._main(args)		function p._main(args)
	local ret = ''		local ret = {}
⚫	local j = 0
	local hasUnsc = {}		local hasUnsc = {}
		⚫	local j = 0

	for i, v in ipairs(args) do		for i, v in ipairs(args) do
	-- Compatibility: Ignore arguments that only contain an apostrophe		-- Compatibility: Ignore arguments that only contain an apostrophe
	if v and v ~= '' and v ~= '~~\''~~ then		if v and v ~= '' and v ~= "'" then
	hasUnsc[i] = mw.ustring.find(v, '_')		hasUnsc[i] = mw.ustring.find(v, '_')
	if hasUnsc[i] then		if hasUnsc[i] then
Line 15:		Line 15:
	else		else
	if v == mw.ustring.upper(v) then		if v == mw.ustring.upper(v) then
	v = '\'\'\'' .. v ~~.. '\'\'\''~~		v = string.format("'''%s'''", v)
	end		end
	if i ~= 1 and not hasUnsc[i - 1] then		if i ~= 1 and not hasUnsc[i - 1] then
	~~v =~~ '-' ~~.. v~~		table.insert(ret, '-')
	end		end
	end		end
			table.insert(ret, v)

	ret = ret .. v
	end		end
	j = i		j = i
	end		end

	~~ret~~ = '<small title="~~English pronunciation respelling~~">~~\'\''~~ .. ~~ret~~ .~~. '\'\'~~</small>'		-- Create <small title="..."><i>...</i></small>
			local small = mw.html.create('small')
			small
			:attr('title', 'English pronunciation respelling')
			:tag('i')
			:wikitext(table.concat(ret))
			ret = tostring(small)

	-- For documentation: Disable linking by adding a blank parameter at the end		-- For documentation: Disable linking by adding a blank parameter at the end
	if args[j] ~= '' then		if args[j] ~= '' then
	ret = '[[Help:Pronunciation respelling key\|' .. ret ~~.. ']]'~~		ret = string.format('[[Help:Pronunciation respelling key\|%s]]', ret)
	end		end