Module:WP - Revision history

WOSlinker: use require('strict') instead of require('Module:No globals')

2022-10-21T22:02:57Z

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

← Previous revision		Revision as of 22:02, 21 October 2022
Line 1:		Line 1:
	require('~~Module:No globals~~');		require('strict');

	local getArgs = require ('Module:Arguments').getArgs;		local getArgs = require ('Module:Arguments').getArgs;

Oshwah: Protected "Module:WP": High-risk Lua module ([Edit=Require template editor access] (indefinite) [Move=Require template editor access] (indefinite))

2020-04-22T21:47:52Z

Protected "Module:WP": High-risk Lua module ([Edit=Require template editor access] (indefinite) [Move=Require template editor access] (indefinite))

← Previous revision	Revision as of 21:47, 22 April 2020
(No difference)

Trappist the monk at 12:10, 15 April 2020

2020-04-15T12:10:06Z

← Previous revision		Revision as of 12:10, 15 April 2020
Line 250:		Line 250:

	if not shortcut or '' == shortcut then		if not shortcut or '' == shortcut then
	return err ('No shortcut name given');		return err ('no shortcut name given');
	end		end

Line 257:		Line 257:
	namespace = namespace:upper();		namespace = namespace:upper();
	if not namespaces[namespace] then		if not namespaces[namespace] then
	return err ('~~Namespace~~ \'' .. namespace .. '\' not recognized in shortcut: ' .. shortcut);		return err ('namespace \'' .. namespace .. '\' not recognized in shortcut: ' .. shortcut);
	else		else
	shortcut = namespaces[namespace] .. rest;		shortcut = namespaces[namespace] .. rest;

Guywan at 14:25, 14 April 2020

2020-04-14T14:25:07Z

← Previous revision		Revision as of 14:25, 14 April 2020
Line 3:		Line 3:
	local getArgs = require ('Module:Arguments').getArgs;		local getArgs = require ('Module:Arguments').getArgs;
	local mRedirect = require ('Module:Redirect')		local mRedirect = require ('Module:Redirect')

	local pseudo_namespaces = {
	['h'] = 'H', -- pseudo namespaces - only first letter case insensitive
⚫	['H'] = 'H',
⚫	['~~mOS~~'] = 'MOS',
	['MOS'] = 'MOS',
	}

	local namespaces = { -- includes namespace aliases - these are case insensitive		local namespaces = { -- includes namespace aliases - these are case insensitive
	['HELP'] = 'H', -- canonical namespaces		['HELP'] = 'Help', -- canonical namespaces
	['WIKIPEDIA'] = 'WP',		['WIKIPEDIA'] = 'WP',

	['PROJECT'] = 'WP', -- namespace aliases		['PROJECT'] = 'Project', -- namespace aliases
	['WP'] = 'WP',		['WP'] = 'WP',
		⚫	['H'] = 'Help',
		⚫	['MOS'] = 'MOS',
	}		}

Line 43:		Line 38:

	local function err (error_msg)		local function err (error_msg)
	return '<span class="error" style="font-size:100%">' .. error_msg .. ' ([[Template:WP\|help]])</span>'; -- tamer, less strident error messages		return '<span class="error" style="font-size:100%">' .. error_msg .. ' ([[Template:WP\|help]])</span>'; -- tamer, less strident error messages
	end		end

Line 61:		Line 56:
	local function get_content (title, label)		local function get_content (title, label)
	local content;		local content;
	local title_obj = mw.title.new (title) -- get title object for <title>		local title_obj = mw.title.new (title); -- get title object for <title>
	if not title_obj then -- title object for non-existent valid <title> will have been created; nil else		if not title_obj then -- title object for non-existent valid <title> will have been created; nil else
	return nil, label .. ': invalid title: ' .. title; -- return nil when <title> is malformed (not a valid title)		return nil, label .. ': invalid title: ' .. title; -- return nil when <title> is malformed (not a valid title)
Line 88:		Line 83:
	local function wikilink_strip(text)		local function wikilink_strip(text)
	for wikilink in text:gmatch('%[%b[]%]') do -- get a wikilink		for wikilink in text:gmatch('%[%b[]%]') do -- get a wikilink
	text = text:gsub('%[%b[]%]', '__57r1P__', 1) -- install a marker		text = text:gsub('%[%b[]%]', '__57r1P__', 1); -- install a marker
	if wikilink:match ('^%[%[%s[Ff]ile:') or wikilink:match ('^%[%[%s[Ii]mage:') then -- if this wikilink is an image		if wikilink:match ('^%[%[%s[Ff]ile:') or wikilink:match ('^%[%[%s[Ii]mage:') then -- if this wikilink is an image
	wikilink = '[IMAGE]'; -- can't display it in a tooltip so use a word; TODO: parse out alt text or caption? worth the effort?		wikilink = '[IMAGE]'; -- can't display it in a tooltip so use a word; TODO: parse out alt text or caption? worth the effort?
	elseif wikilink:match('%[%[.-\|(.-)%]%]') then		elseif wikilink:match('%[%[.-\|(.-)%]%]') then
	wikilink = wikilink:match('%[%[.-\|(.-)%]%]') -- extract label from complex [[link\|label]] wikilink		wikilink = wikilink:match('%[%[.-\|(.-)%]%]'); -- extract label from complex [[link\|label]] wikilink
	else		else
	wikilink = wikilink:match('%[%[(.-)%]%]') -- extract link from simple [[link]] wikilinks		wikilink = wikilink:match('%[%[(.-)%]%]'); -- extract link from simple [[link]] wikilinks
	end		end
	wikilink = escape_lua_magic_chars(wikilink) -- in case there are lua magic characters in wikilink		wikilink = escape_lua_magic_chars(wikilink); -- in case there are lua magic characters in wikilink
	text = text:gsub('__57r1P__', wikilink, 1) -- replace the marker with the appropriate text		text = text:gsub('__57r1P__', wikilink, 1); -- replace the marker with the appropriate text
	end		end

	return text		return text;
	end		end

Line 251:		Line 246:
	local function main (frame)		local function main (frame)
	local args = getArgs (frame); -- get a table of arguments		local args = getArgs (frame); -- get a table of arguments
	local out = {}		local out = {};
	local shortcut = args[1]; -- TODO: error check this; no point in continuing without properly formed shortcut		local shortcut = args[1]; -- TODO: error check this; no point in continuing without properly formed shortcut

Line 258:		Line 253:
	end		end

	local namespace = shortcut:match ('^(%a+):%w+');		local namespace, rest = shortcut:match ('^(%a+)(:%w+)');
	if namespace then		if namespace then
	if ~~not~~ ~~namespaces[~~namespace:upper()~~] and not pseudo_namespaces[namespace] then~~		namespace = namespace:upper();
			if not namespaces[namespace] then
	return err ('Namespace \'' .. namespace .. '\' not recognized in shortcut: ' .. shortcut);		return err ('Namespace \'' .. namespace .. '\' not recognized in shortcut: ' .. shortcut);
			else
			shortcut = namespaces[namespace] .. rest;
	end		end
	else		else

Trappist the monk at 00:20, 14 April 2020

2020-04-14T00:20:28Z

Show changes

Trappist the monk at 22:19, 13 April 2020

2020-04-13T22:19:14Z

@@ Line 49: / Line 49: @@
 -- Get a redirect target (or nil if not a redirect) without using the expensive title object property .isRedirect
 local function getRedirectTarget(titleObject)
-	local content = titleObject:getContent()
+	local content = titleObject:getContent()									-- get content of redirect page
-	if not content then return nil end
+	if not content then
 end
-	return title:getContent(), redir or title.prefixedText
+	return title_obj:getContent(), target_title									-- <target title> content and <target title> from redirect page
 end
@@ Line 150: / Line 173: @@
 local function nutshell_text_get (shortcut, frame)
 	local c;																	-- general purpose var holds the tally of gsub() replacements made when needed
 	local title_param;															-- {{nutshell}} |title= parameter contents and value used in tooltip rendering
@@ Line 161: / Line 183: @@
 	if not content then
-		return nil, 'Cannot read a valid shortcut: shortcut name is ' .. shortcut;
+		return nil, 'No content at shortcut: ' .. normalisedPagename;
 	end

Trappist the monk at 17:59, 13 April 2020

2020-04-13T17:59:44Z

← Previous revision		Revision as of 17:59, 13 April 2020
Line 43:		Line 43:

	local function err (error_msg)		local function err (error_msg)
	return '<span class="error" style="font-size:100%">' .. error_msg .. '</span>'; -- tamer, less strident error messages		return '<span class="error" style="font-size:100%">' .. error_msg .. ' ([[Template:WP\|help]])</span>'; -- tamer, less strident error messages
	end		end

Trappist the monk at 14:48, 13 April 2020

2020-04-13T14:48:28Z

Show changes

Trappist the monk at 00:08, 13 April 2020

2020-04-13T00:08:36Z

← Previous revision		Revision as of 00:08, 13 April 2020
Line 141:		Line 141:
	end		end

	if content then -- why do we care if page is a stub?
	local isStub = mw.ustring.find(content, "%s{{[^{\|}]%-[Ss]tub%s*}}")
	if isStub then content = nil end
	end

	if not content then		if not content then
	return nil, 'Cannot read a valid page: page name is ' .. pagename;		return nil, 'Cannot read a valid page: page name is ' .. pagename;

Trappist the monk at 00:00, 13 April 2020

2020-04-13T00:00:27Z

← Previous revision		Revision as of 00:00, 13 April 2020
Line 233:		Line 233:
	return err ('No page name given');		return err ('No page name given');
	end		end


	if pagename:match ('%u+:(%a+)') ~~then~~		local namespace = pagename:match ('^(%u+):%a+');
			if namespace then
⚫	pagename = pagename:gsub ('%u+:(%a+)', 'WP:%1'); -- replace whatever namespace is included and rewrite to WP: namespace
			if ('WP' ~= namespace) and ('MOS' ~= namespace) then -- only accepted namespace prefixes
			pagename = pagename:gsub ('^%u+:(%a+)', 'WP:%1'); -- replace whatever namespace is included and rewrite to WP: namespace
			end
	else		else
	pagename = 'WP:' .. pagename; -- add WP: namespace		pagename = 'WP:' .. pagename; -- add WP: namespace
	end		end

			-- if pagename:match ('%u+:(%a+)') then
		⚫	-- pagename = pagename:gsub ('%u+:(%a+)', 'WP:%1'); -- replace whatever namespace is included and rewrite to WP: namespace
			-- else
			-- pagename = 'WP:' .. pagename; -- add WP: namespace
			-- end

	local nutshell, error_msg = nutshell_text_get (pagename, frame); -- pass frame so that nutshell_text_get() has access to frame:preprocess()		local nutshell, error_msg = nutshell_text_get (pagename, frame); -- pass frame so that nutshell_text_get() has access to frame:preprocess()