Module:Delink - Revision history

imported>Pppery: Changed protection settings for "Module:Delink": Dependency of fully-protected (and on WP:CASC) Template:Fix ([Edit=Require administrator access] (indefinite) [Move=Require administrator access] (indefinite))

2024-02-17T04:47:33Z

Changed protection settings for "Module:Delink": Dependency of fully-protected (and on WP:CASC) Template:Fix ([Edit=Require administrator access] (indefinite) [Move=Require administrator access] (indefinite))

← Older revision	Revision as of 04:47, 17 February 2024
(No difference)

imported>WOSlinker: use require("strict") instead of require("Module:No globals")

2022-10-21T09:52:18Z

use require("strict") instead of require("Module:No globals")

← Older revision		Revision as of 09:52, 21 October 2022
Line 1:		Line 1:
	-- This module de-links most wikitext.		-- This module de-links most wikitext.

	require("~~Module:No globals~~")		require("strict")

	local p = {}		local p = {}

imported>Gonnym: synced from sandbox: consistent spacing; cleaner code - if not (x == y) -> if x ~= y, etc; fix for question mark - can now delink What If...? style titles.

2021-09-30T12:36:18Z

synced from sandbox: consistent spacing; cleaner code - if not (x == y) -> if x ~= y, etc; fix for question mark - can now delink What If...? style titles.

Show changes

imported>Dinoguy1000: fix typo

2021-09-18T22:17:38Z

fix typo

← Older revision		Revision as of 22:17, 18 September 2021
Line 185:		Line 185:
	text = delinkLinkClass(text, "^%[%[.-%]%]", delinkWikilink) -- De-link wikilinks and return the label portion of the wikilink.		text = delinkLinkClass(text, "^%[%[.-%]%]", delinkWikilink) -- De-link wikilinks and return the label portion of the wikilink.
	elseif 'target' == args.wikilinks then		elseif 'target' == args.wikilinks then
	text = delinkLinkClass(text, "^%[%[.-%]%]", delinkWikilink_tgt) -- De-link wikilinks and return the target portions of the ~~wilikink~~		text = delinkLinkClass(text, "^%[%[.-%]%]", delinkWikilink_tgt) -- De-link wikilinks and return the target portions of the wikilink
	end		end
	if not (args.urls == "no") then		if not (args.urls == "no") then

imported>Trappist the monk: sync from sandbox per WP:VPT discussion;

2021-06-22T19:10:24Z

sync from sandbox per WP:VPT discussion;

← Older revision		Revision as of 19:10, 22 June 2021
Line 34:		Line 34:
	end		end
	return s		return s
			end

			local function delinkWikilink_tgt(s) -- return wikilink target \|wikilinks=target
			local result = s
			-- Deal with the reverse pipe trick.
			if result:match("%[%[\|") then
			return delinkReversePipeTrick(result)
			end

			result = mw.uri.decode(result, "PATH") -- decode percent-encoded entities. Leave underscores and plus signs.
			result = mw.text.decode(result, true) -- decode HTML entities.

			-- Check for bad titles. To do this we need to find the
			-- title area of the link, i.e. the part before any pipes.
			local target_area
			if result:match("\|") then -- Find if we're dealing with a piped link.
			target_area = result:match("^%[%[(.-)\|.*%]%]")
			else
			target_area = result:match("^%[%[(.-)%]%]")
			end
			-- Check for bad characters.
			if mw.ustring.match(target_area, "[%[%]<>{}%%%c\n]") then
			return s
			end

			return target_area
	end		end

Line 48:		Line 74:
	-- Check for bad titles. To do this we need to find the		-- Check for bad titles. To do this we need to find the
	-- title area of the link, i.e. the part before any pipes.		-- title area of the link, i.e. the part before any pipes.
	local ~~titlearea~~		local target_area
	if result:match("\|") then -- Find if we're dealing with a piped link.		if result:match("\|") then -- Find if we're dealing with a piped link.
	~~titlearea~~ = result:match("^%[%[(.-)\|.*%]%]")		target_area = result:match("^%[%[(.-)\|.*%]%]")
	else		else
	~~titlearea~~ = result:match("^%[%[(.-)%]%]")		target_area = result:match("^%[%[(.-)%]%]")
	end		end
	-- Check for bad characters.		-- Check for bad characters.
	if mw.ustring.match(~~titlearea~~, "[%[%]<>{}%%%c\n]") then		if mw.ustring.match(target_area, "[%[%]<>{}%%%c\n]") then
	return s		return s
	end		end

	-- Check for categories, interwikis, and files.		-- Check for categories, interwikis, and files.
	local colonprefix = result:match("%[%[(.-):.*%]%]") or "" -- Get the text before the first colon.		local colonprefix = result:match("%[%[(.-):.*%]%]") or "" -- Get the text before the first colon.
Line 156:		Line 182:
	text = text:gsub("<!%-%-.-%-%->", "") -- Remove html comments.		text = text:gsub("<!%-%-.-%-%->", "") -- Remove html comments.
	end		end
	if not (args.wikilinks == "no") then		if not (args.wikilinks == "no") and 'target' ~= args.wikilinks then
	text = delinkLinkClass(text, "^%[%[.-%]%]", delinkWikilink) -- De-link wikilinks.		text = delinkLinkClass(text, "^%[%[.-%]%]", delinkWikilink) -- De-link wikilinks and return the label portion of the wikilink.
	end		elseif 'target' == args.wikilinks then
			text = delinkLinkClass(text, "^%[%[.-%]%]", delinkWikilink_tgt) -- De-link wikilinks and return the target portions of the wilikink
			end
	if not (args.urls == "no") then		if not (args.urls == "no") then
	text = delinkLinkClass(text, "^%[.-%]", delinkURL) -- De-link URLs.		text = delinkLinkClass(text, "^%[.-%]", delinkURL) -- De-link URLs.

imported>The Earwig: Protected "Module:Delink": Highly visible template: 55,000+ mainspace transclusions ([Edit=Allow only template editors and admins] (indefinite) [Move=Allow only template editors and admins] (indefinite))

2015-12-14T07:03:21Z

Protected "Module:Delink": Highly visible template: 55,000+ mainspace transclusions ([Edit=Allow only template editors and admins] (indefinite) [Move=Allow only template editors and admins] (indefinite))

← Older revision	Revision as of 07:03, 14 December 2015
(No difference)

imported>Jackmcbarn: don't use globals

2014-07-20T02:20:53Z

don't use globals

← Older revision		Revision as of 02:20, 20 July 2014
Line 1:		Line 1:
	-- This module de-links most wikitext.		-- This module de-links most wikitext.

			require('Module:No globals')

	local p = {}		local p = {}
Line 115:		Line 117:
	s = mw.ustring.match(s, "^%s(%S.)$") or "" -- If the separating character was a space, trim it off.		s = mw.ustring.match(s, "^%s(%S.)$") or "" -- If the separating character was a space, trim it off.

	s_decoded = mw.text.decode(s, true)		local s_decoded = mw.text.decode(s, true)
	if mw.ustring.match(s_decoded, "%c") then		if mw.ustring.match(s_decoded, "%c") then
	return s		return s

imported>Jackmcbarn: use Module:Arguments

2014-07-12T00:42:12Z

use Module:Arguments

← Older revision		Revision as of 00:42, 12 July 2014
Line 2:		Line 2:

	local p = {}		local p = {}

			local getArgs

	local function delinkReversePipeTrick(s)		local function delinkReversePipeTrick(s)
Line 168:		Line 170:

	function p.delink(frame)		function p.delink(frame)
	~~local args~~		if not getArgs then
	~~if frame =~~= ~~mw.getCurrentFrame~~(~~) then~~		getArgs = require('Module:Arguments').getArgs
	~~-- We~~'~~re being called via #invoke. If the invoking template passed any args, use~~
	~~-- them. Otherwise, use the args that were passed into the template.~~
	~~args = frame~~:~~getParent().args~~
	~~for k, v in pairs(frame.args~~) do
	~~args = frame.args~~
	~~break~~
	~~end~~
	~~else~~
	~~-- We're being called from another module or from the debug console, so assume~~
	~~-- the args are passed in directly~~.
	~~args = frame~~
	end		end
	return p._delink(~~args~~)		return p._delink(getArgs(frame, {wrappers = 'Template:Delink'}))
	end		end

	return p		return p

imported>Jackmcbarn: since mw.ustring is 30x slower than string, only use it when necessary

2014-07-12T00:34:43Z

since mw.ustring is 30x slower than string, only use it when necessary

← Older revision		Revision as of 00:34, 12 July 2014
Line 4:		Line 4:

	local function delinkReversePipeTrick(s)		local function delinkReversePipeTrick(s)
	if ~~mw.ustring.~~match(s, "^%[%[\|.*[\|\n]") then -- Check for newlines or multiple pipes.		if s:match("^%[%[\|.*[\|\n]") then -- Check for newlines or multiple pipes.
	return s		return s
	else		else
	return ~~mw.ustring.~~match(s, "%[%[\|(.*)%]%]")		return s:match("%[%[\|(.*)%]%]")
	end		end
	end		end
Line 16:		Line 16:

	-- First, remove the text before the first colon, if any.		-- First, remove the text before the first colon, if any.
	if ~~mw.ustring.~~match(s, ":") then		if s:match(":") then
	s = ~~mw.ustring.~~match(s, "%[%[.-:(.*)\|%]%]")		s = s:match("%[%[.-:(.*)\|%]%]")
	-- If there are no colons, grab all of the text apart from the square brackets and the pipe.		-- If there are no colons, grab all of the text apart from the square brackets and the pipe.
	else		else
	s = ~~mw.ustring.~~match(s, "%[%[(.*)\|%]%]")		s = s:match("%[%[(.*)\|%]%]")
	end		end

	-- Next up, brackets and commas.		-- Next up, brackets and commas.
	if ~~mw.ustring.~~match(s, "%(.-%)$") then -- Brackets trump commas.		if s:match("%(.-%)$") then -- Brackets trump commas.
	s = ~~mw.ustring.~~match(s, "(.-) ?%(.-%)$")		s = s:match("(.-) ?%(.-%)$")
	elseif ~~mw.ustring.~~match(s, ",") then -- If there are no brackets, display only the text before the first comma.		elseif s:match(",") then -- If there are no brackets, display only the text before the first comma.
	s = ~~mw.ustring.~~match(s, "(.-),.*$")		s = s:match("(.-),.*$")
	end		end
	return s		return s
Line 35:		Line 35:
	local result = s		local result = s
	-- Deal with the reverse pipe trick.		-- Deal with the reverse pipe trick.
	if ~~mw.ustring.~~match(~~result,~~ "%[%[\|") then		if result:match("%[%[\|") then
	return delinkReversePipeTrick(result)		return delinkReversePipeTrick(result)
	end		end
Line 45:		Line 45:
	-- title area of the link, i.e. the part before any pipes.		-- title area of the link, i.e. the part before any pipes.
	local titlearea		local titlearea
	if ~~mw.ustring.~~match(~~result,~~ "\|") then -- Find if we're dealing with a piped link.		if result:match("\|") then -- Find if we're dealing with a piped link.
	titlearea = ~~mw.ustring.~~match(~~result,~~ "^%[%[(.-)\|.*%]%]")		titlearea = result:match("^%[%[(.-)\|.*%]%]")
	else		else
	titlearea = ~~mw.ustring.~~match(~~result,~~ "^%[%[(.-)%]%]")		titlearea = result:match("^%[%[(.-)%]%]")
	end		end
	-- Check for bad characters.		-- Check for bad characters.
Line 56:		Line 56:

	-- Check for categories, interwikis, and files.		-- Check for categories, interwikis, and files.
	local colonprefix = ~~mw.ustring.~~match(~~result,~~ "%[%[(.-):.*%]%]") or "" -- Get the text before the first colon.		local colonprefix = result:match("%[%[(.-):.*%]%]") or "" -- Get the text before the first colon.
	local ns = mw.site.namespaces[colonprefix] -- see if this is a known namespace		local ns = mw.site.namespaces[colonprefix] -- see if this is a known namespace
	if mw.language.isKnownLanguageTag(colonprefix)		if mw.language.isKnownLanguageTag(colonprefix)
Line 64:		Line 64:

	-- Remove the colon if the link is using the [[Help:Colon trick]].		-- Remove the colon if the link is using the [[Help:Colon trick]].
	if ~~mw.ustring.~~match(~~result,~~ "%[%[:") then		if result:match("%[%[:") then
	result = "[[" .. ~~mw.ustring.~~match(~~result,~~ "%[%[:(.*%]%])")		result = "[[" .. result:match("%[%[:(.*%]%])")
	end		end

Line 74:		Line 74:

	-- Find the display area of the wikilink		-- Find the display area of the wikilink
	if ~~mw.ustring.~~match(~~result,~~ "\|") then -- Find if we're dealing with a piped link.		if result:match("\|") then -- Find if we're dealing with a piped link.
	result = ~~mw.ustring.~~match(~~result,~~ "^%[%[.-\|(.+)%]%]")		result = result:match("^%[%[.-\|(.+)%]%]")
	-- Remove new lines from the display of multiline piped links,		-- Remove new lines from the display of multiline piped links,
	-- where the pipe is before the first new line.		-- where the pipe is before the first new line.
	result = ~~mw.ustring.~~gsub(~~result,~~ "\n", "")		result = result:gsub("\n", "")
	else		else
	result = ~~mw.ustring.~~match(~~result,~~ "^%[%[(.-)%]%]")		result = result:match("^%[%[(.-)%]%]")
	end		end

Line 91:		Line 91:

	-- If the text contains a line break it is not formatted as a URL, regardless of other content.		-- If the text contains a line break it is not formatted as a URL, regardless of other content.
	if ~~mw.ustring.~~match(s, "\n") then		if s:match("\n") then
	return s		return s
	end		end
Line 109:		Line 109:
	return s		return s
	end		end
	s = ~~mw.ustring.~~match(s, "^%[" .. url_prefix .. "(.*)%]") -- Grab all of the text after the URL prefix and before the final square bracket.		s = s:match("^%[" .. url_prefix .. "(.*)%]") -- Grab all of the text after the URL prefix and before the final square bracket.
	s = ~~mw.ustring.~~match(s, '^.-(["<> ].*)') or "" -- Grab all of the text after the first URL separator character ("<> ).		s = s:match('^.-(["<> ].*)') or "" -- Grab all of the text after the first URL separator character ("<> ).
	s = mw.ustring.match(s, "^%s(%S.)$") or "" -- If the separating character was a space, trim it off.		s = mw.ustring.match(s, "^%s(%S.)$") or "" -- If the separating character was a space, trim it off.

Line 132:		Line 132:
	-- than just use gsub, otherwise nested links aren't detected properly.		-- than just use gsub, otherwise nested links aren't detected properly.
	local result = ""		local result = ""
	while ~~mw.ustring.len(~~s~~) > 0~~ do		while s ~= '' do
	-- Replace text using one iteration of gsub.		-- Replace text using one iteration of gsub.
	s = mw.ustring.gsub(s, pattern, delinkFunction, 1)		s = mw.ustring.gsub(s, pattern, delinkFunction, 1)
Line 150:		Line 150:
	end		end
	if not (args.comments == "no") then		if not (args.comments == "no") then
	text = ~~mw.ustring.~~gsub(~~text,~~ "<!%-%-.-%-%->", "") -- Remove html comments.		text = text:gsub("<!%-%-.-%-%->", "") -- Remove html comments.
	end		end
	if not (args.wikilinks == "no") then		if not (args.wikilinks == "no") then
Line 162:		Line 162:
	-- and new lines only containing spaces or tabs before a second new line.		-- and new lines only containing spaces or tabs before a second new line.
	text = mw.ustring.gsub(text, "([^\n \t][ \t])\n([ \t][^\n \t])", "%1 %2")		text = mw.ustring.gsub(text, "([^\n \t][ \t])\n([ \t][^\n \t])", "%1 %2")
	text = ~~mw.ustring.~~gsub(~~text,~~ "[ \t]+", " ") -- Remove extra tabs and spaces.		text = text:gsub("[ \t]+", " ") -- Remove extra tabs and spaces.
	end		end
	return text		return text

imported>Jackmcbarn: expose _delink

2014-06-26T00:13:20Z

expose _delink

← Older revision		Revision as of 00:13, 26 June 2014
Line 142:		Line 142:
	end		end

	~~local~~ function _delink(args)		function p._delink(args)
	local text = args[1] or ""		local text = args[1] or ""
	if args.refs == "yes" then		if args.refs == "yes" then
Line 182:		Line 182:
	args = frame		args = frame
	end		end
	return _delink(args)		return p._delink(args)
	end		end

	return p		return p