Modul:TemplUtl - Versionsgeschichte

PerfektesChaos: 2025-07-16

2025-07-17T13:25:28Z

2025-07-16

← Nächstältere Version		Version vom 17. Juli 2025, 14:25 Uhr
Zeile 1:		Zeile 1:
	local TemplUtl = { suite = "TemplUtl",		local TemplUtl = { suite = "TemplUtl",
	serial = "2025-07-08",		serial = "2025-07-16",
	item = 52364930 };		item = 52364930 };
	--[=[		--[=[
Zeile 716:		Zeile 716:
	-- Check whether username is matching temporary scheme		-- Check whether username is matching temporary scheme
	-- Precondition:		-- Precondition:
	-- account -- string		-- account -- string, or nil derived from current page
	-- Postcondition:		-- Postcondition:
	-- Returns boolean		-- Returns boolean
	local r = ~~false~~;		local s = account;
	if type( ~~account~~ ) == "string" then		local r;
			if type( s ) == "string" then
			s = mw.text.trim( s );
			if s == "" then
			s = false;
			end
			end
			if type( s ) ~= "string" then
			local t = mw.title.getCurrentTitle();
			if t.namespace == 2 or t.namespace == 3 then
			s = t.rootText;
			end
			end
			if type( s ) == "string" then
	local seek = "^~(20[2-9]%d)%-([1-9]%d%d%d[%d%-]*)$";		local seek = "^~(20[2-9]%d)%-([1-9]%d%d%d[%d%-]*)$";
	local y~~, s = account:match( seek )~~;		local y;
			if s:sub( 1, 1 ) == "&" then
			s = mw.text.decode( s );
			end
			y, s = s:match( seek );
	if y then		if y then
	y = tonumber( y );		y = tonumber( y );
Zeile 753:		Zeile 770:
	end		end
	end		end
	return r;		return r or false;
	end -- TemplUtl.isTempAccount()		end -- TemplUtl.isTempAccount()

PerfektesChaos: 2025-07-08

2025-07-08T13:37:01Z

2025-07-08

@@ Zeile 1: / Zeile 1: @@
 local TemplUtl = { suite  = "TemplUtl",
-                   serial = "2025-07-01",
+                   serial = "2025-07-08",
                    item   = 52364930 };
 --[=[
@@ Zeile 721: / Zeile 721: @@
     local r = false;
     if type( account ) == "string" then
-        local y, s = account:match( "^~(20[2-9]%d)%-([1-9]%d*)$" );
+        local seek = "^~(20[2-9]%d)%-([1-9]%d%d%d[%d%-]*)$";
         if y then
             y = tonumber( y );
             if y >= 2024 then
-                r = true;
+                local g;
             end
         end

PerfektesChaos: 2025-07-01

2025-07-01T23:18:17Z

2025-07-01

← Nächstältere Version		Version vom 2. Juli 2025, 00:18 Uhr
Zeile 1:		Zeile 1:
	local TemplUtl = { suite = "TemplUtl",		local TemplUtl = { suite = "TemplUtl",
	serial = "~~2022~~-05-16",		serial = "2025-07-01",
	item = 52364930 };		item = 52364930 };
	--[=[		--[=[
Zeile 710:		Zeile 710:
	return r;		return r;
	end -- TemplUtl.flat()		end -- TemplUtl.flat()



			TemplUtl.isTempAccount = function ( account )
			-- Check whether username is matching temporary scheme
			-- Precondition:
			-- account -- string
			-- Postcondition:
			-- Returns boolean
			local r = false;
			if type( account ) == "string" then
			local y, s = account:match( "^~(20[2-9]%d)%-([1-9]%d*)$" );
			if y then
			y = tonumber( y );
			if y >= 2024 then
			r = true;
			end
			end
			end
			return r;
			end -- TemplUtl.isTempAccount()


Zeile 732:		Zeile 753:
	-- Returns string -- with queried version/item, also if problem		-- Returns string -- with queried version/item, also if problem
	-- false -- if appropriate		-- false -- if appropriate
	-- ~~2020~~-08-17		-- 2024-03-01
	local since = atleast		local since = atleast
	local last = ( since == "~" )		local last = ( since == "~" )
	local linked = ( since == "@" )		local linked = ( since == "@" )
	local link = ( since == "item" )		local link = ( since == "item" )
	local r		local r
	if last or link or linked or since == "wikidata" then		if last or link or linked or since == "wikidata" then
Zeile 768:		Zeile 789:
	end		end
	end		end
			elseif link then
			r = false
	end		end
	end		end
Zeile 847:		Zeile 870:
	function p.isRedirect()		function p.isRedirect()
	return mw.title.getCurrentTitle().isRedirect and "1" or "";		return mw.title.getCurrentTitle().isRedirect and "1" or "";
			end -- p.isRedirect

			function p.isTempAccount( frame )
			local r = ( frame.args[ 1 ] );
			if r then
			r = mw.text.trim( r );
			if r == "" then
			r = false;
			end
			end
			return TemplUtl.isTempAccount( r ) and "1" or "";
	end -- p.isRedirect		end -- p.isRedirect

Zeile 859:		Zeile 893:
	return r or "";		return r or "";
	end -- p.nowiki1		end -- p.nowiki1

			function p.siteID( frame )
			return mw.wikibase.getGlobalSiteId();
			end -- p.siteID

	p.failsafe = function ( frame )		p.failsafe = function ( frame )

PerfektesChaos: 2022-05-16

2022-05-17T14:07:36Z

2022-05-16

← Nächstältere Version		Version vom 17. Mai 2022, 15:07 Uhr
Zeile 1:		Zeile 1:
	local TemplUtl = { suite = "TemplUtl",		local TemplUtl = { suite = "TemplUtl",
	serial = "2022-05-15",		serial = "2022-05-16",
	item = 52364930 };		item = 52364930 };
	--[=[		--[=[
Zeile 95:		Zeile 95:
	r = mw.text.decode( r );		r = mw.text.decode( r );
	end		end
	r = ~~mw.text.trim(~~ mw.ustring.gsub( r, "[%s%p]+", " " ) );		r = mw.ustring.gsub( r, "[%s%p%c]+", " " );
			r = mw.text.trim( r );
	return r;		return r;
	end -- TemplUtl.facets()		end -- TemplUtl.facets()

PerfektesChaos: 022-05-15

2022-05-16T19:34:45Z

022-05-15

← Nächstältere Version		Version vom 16. Mai 2022, 20:34 Uhr
Zeile 1:		Zeile 1:
	local TemplUtl = { suite = "TemplUtl",		local TemplUtl = { suite = "TemplUtl",
	serial = "~~2021~~-01-01",		serial = "2022-05-15",
	item = 52364930 };		item = 52364930 };
	--[=[		--[=[
Zeile 18:		Zeile 18:
	local r = adjust;		local r = adjust;
	local c = r:byte( 1, 1 );		local c = r:byte( 1, 1 );
			local lead;
	if c <= 59 and		if c <= 59 and
	( c==35 or c==42 or c==58 or c==59 ) then		( c==35 or c==42 or c==58 or c==59 ) then
		⚫	lead = true;
		⚫	elseif c == 123 or c == 124 then
		⚫	local c2 = r:byte( 2, 1 );
		⚫	if c == 123 and c2 == 124 then
			lead = true;
		⚫	elseif ahead and c == 124 and
			( c2 == 43 or c2 == 45 or c2 == 125 ) then
			lead = true;
		⚫	end
			end
			if lead then
	if ahead then		if ahead then
	r = "\n" .. r;		r = "\n" .. r;
	else		else
	r = mw.text.nowiki( r:sub( 1, 1 ) ) .. r:sub( 2 );		r = mw.text.nowiki( r:sub( 1, 1 ) ) .. r:sub( 2 );
⚫	end
⚫	elseif ~~ahead~~ then
⚫	local c2 = r:byte( 2, 1 );
⚫	if ( ~~c==123~~ and c2==124 ) or
⚫	( c==~~124~~ and c2==45 ) then
⚫	r = ~~"\n" .. r~~;
	end		end
	end		end
Zeile 79:		Zeile 85:
	return TemplUtl.frame;		return TemplUtl.frame;
	end -- framing()		end -- framing()



			TemplUtl.facets = function ( ask, adjust )
			local r = ask;
			if adjust == "%" and r:find( "%%%x%x" ) then
			r = mw.uri.decode( r, "PATH" );
			elseif r:find( "&", 1, true ) then
			r = mw.text.decode( r );
			end
			r = mw.text.trim( mw.ustring.gsub( r, "[%s%p]+", " " ) );
			return r;
			end -- TemplUtl.facets()


Zeile 148:		Zeile 167:
	elseif s == "boolean" then		elseif s == "boolean" then
	r = another;		r = another;
	elseif ~~another~~ == "-" then		elseif s == "string" then
	r = ~~"-"~~;		s = mw.text.trim( another );
	~~else~~		if s == "-" then
	r = ~~TemplUtl.faculty(~~ ~~another~~ );		r = "-";
			elseif s == "" then
			r = true;
			else
			r = TemplUtl.faculty( s );
			end
	end		end
	end		end
Zeile 759:		Zeile 783:
	-- Export		-- Export
	local p = { };		local p = { };

			function p.facets( frame )
			return TemplUtl.facets( frame.args[ 1 ] or "",
			frame.args.decode );
			end -- p.facets

	function p.faculty( frame )		function p.faculty( frame )
	~~return~~ TemplUtl.faculty( frame.args[ 1 ],		local r = TemplUtl.faculty( frame.args[ 1 ],
	frame.args[ 2 ] ) ~~and "1"~~		frame.args[ 2 ] );
	or "";		if r ~= "-" then
			r = r and "1";
			end
			return r or "";
	end -- p.faculty		end -- p.faculty

Zeile 848:		Zeile 880:
	return TemplUtl;		return TemplUtl;
	end -- p.TemplUtl()		end -- p.TemplUtl()

			setmetatable( p, { __call = function ( func, ... )
			setmetatable( p, nil );
			return Failsafe;
			end } );

	return p;		return p;

PerfektesChaos: 2021-01-01

2021-01-24T22:39:46Z

2021-01-01

← Nächstältere Version		Version vom 24. Januar 2021, 23:39 Uhr
Zeile 1:		Zeile 1:
	local TemplUtl = { suite = "TemplUtl",		local TemplUtl = { suite = "TemplUtl",
	serial = "~~2019~~-11-20",		serial = "2021-01-01",
	item = 52364930 };		item = 52364930 };
			--[=[
			Utilities to support template programming.
			]=]
	local Failsafe = TemplUtl;		local Failsafe = TemplUtl;

Zeile 62:		Zeile 65:

	local framing = function ( frame )		local framing = function ( frame )
			-- Ensure availability of frame object
			-- Precondition:
			-- frame -- object; #invoke environment, or false
			-- Postcondition:
			-- Return frame object
	if not TemplUtl.frame then		if not TemplUtl.frame then
	if type( frame ) == "table" then		if type( frame ) == "table" then
Zeile 78:		Zeile 86:
	-- analyze -- string, boolean, number or nil		-- analyze -- string, boolean, number or nil
	-- another -- fallback: string, boolean, or nil		-- another -- fallback: string, boolean, or nil
			-- "-" to test for explicit vocabulary choice
	-- Returns boolean		-- Returns boolean, or "-"
	local s = type( analyze );		local s = type( analyze );
	local r;		local r;
Zeile 86:		Zeile 95:
	r = TemplUtl.faculty( another, nil );		r = TemplUtl.faculty( another, nil );
	elseif r:find( "1", 1, true ) and		elseif r:find( "1", 1, true ) and
	r:match( "^[0%-]1[01%-]$") then		r:match( "^[0%-]1[01%-]$" ) then
	r = true;		r = true;
	elseif r:match( "^[0%-]+$") then		elseif r:match( "^[0%-]+$" ) then
	r = false;		r = false;
	else		else
Zeile 139:		Zeile 148:
	elseif s == "boolean" then		elseif s == "boolean" then
	r = another;		r = another;
			elseif another == "-" then
			r = "-";
	else		else
	r = TemplUtl.faculty( another );		r = TemplUtl.faculty( another );
Zeile 691:		Zeile 702:
	-- Retrieve versioning and check for compliance		-- Retrieve versioning and check for compliance
	-- Precondition:		-- Precondition:
	-- atleast -- string, with required version ~~or "wikidata" or "~"~~		-- atleast -- string, with required version
	-- or false		-- or wikidata\|item\|~\|@ or false
	-- Postcondition:		-- Postcondition:
	-- Returns string -- with queried version, also if problem		-- Returns string -- with queried version/item, also if problem
	-- false -- if appropriate		-- false -- if appropriate
			-- 2020-08-17
⚫	local last = ( ~~atleast~~ == "~" )
	local since = atleast		local since = atleast
		⚫	local last = ( since == "~" )
			local linked = ( since == "@" )
			local link = ( since == "item" )
	local r		local r
	if last or since == "wikidata" then		if last or link or linked or since == "wikidata" then
	local item = Failsafe.item		local item = Failsafe.item
	since = false		since = false
	if type( item ) == "number" and item > 0 then		if type( item ) == "number" and item > 0 then
	local ~~entity~~ = ~~mw.wikibase.getEntity(~~ string.format( "Q%d",		local suited = string.format( "Q%d", item )
			if link then
⚫	~~item ) )~~
	if ~~type(~~ ~~entity~~ ) =~~= "table"~~ ~~then~~		r = suited
			else
	local seek = Failsafe.serialProperty or "P348"
	local ~~vsn~~ = ~~entity:formatPropertyValues~~( ~~seek~~ )		local entity = mw.wikibase.getEntity( suited )
	if type( ~~vsn~~ ) == "table" ~~and~~		if type( entity ) == "table" then
	~~type(~~ ~~vsn.value~~ ) == "~~string~~" ~~and~~		local seek = Failsafe.serialProperty or "P348"
	vsn~~.value~~ ~= "" ~~then~~		local vsn = entity:formatPropertyValues( seek )
	if ~~last~~ ~~and vsn.value~~ == ~~Failsafe.serial~~ ~~then~~		if type( vsn ) == "table" and
	r = ~~false~~		type( vsn.value ) == "string" and
	~~else~~		vsn.value ~= "" then
	r = vsn.value		if last and vsn.value == Failsafe.serial then
			r = false
			elseif linked then
			if mw.title.getCurrentTitle().prefixedText
			== mw.wikibase.getSitelink( suited ) then
		⚫	r = false
			else
			r = suited
			end
			else
			r = vsn.value
			end
	end		end
	end		end

PerfektesChaos: 2019-11-20

2019-11-30T17:52:46Z

2019-11-20

← Nächstältere Version		Version vom 30. November 2019, 18:52 Uhr
Zeile 1:		Zeile 1:
	local TemplUtl = { suite = "TemplUtl",		local TemplUtl = { suite = "TemplUtl",
	serial = "2019-11-12",		serial = "2019-11-20",
	item = 52364930 };		item = 52364930 };
	local Failsafe = TemplUtl;		local Failsafe = TemplUtl;
Zeile 103:		Zeile 103:
	r = false;		r = false;
	else		else
	if not TemplUtl.~~L10N~~ then		if not TemplUtl.boolang then
	~~local~~ ~~lucky;~~		-- TODO: page language
	s = ~~string.format~~( "~~Module:%s~~/~~local~~",		local l, d = pcall( mw.ext.data.get, "i18n/01.tab" );
	~~TemplUtl.suite );~~		if type( d ) == "table" and
	~~lucky,~~ ~~TemplUtl.L10N~~ = ~~pcall~~( mw.~~loadData, s~~ );		type( d.data ) == "table" then
		⚫	local f = function ( at )
		⚫	local e = d.data[ at ];
		⚫	l = e[ 1 ];
		⚫	s = e[ 2 ];
		⚫	if type( l ) == "boolean" and
		⚫	type( s ) == "string" then
			s = mw.text.split( s, "\|" );
		⚫	for i = 1, #s do
		⚫	TemplUtl.boolang[ s[ i ] ] = l;
		⚫	end -- for i
		⚫	end
		⚫	end
		⚫	TemplUtl.boolang = { };
			f( 1 );
			f( 2 );
			else
			TemplUtl.boolang = true;
			end
	end		end
	if type( TemplUtl.~~L10N~~ ) == "table" then		if type( TemplUtl.boolang ) == "table" then
	~~local~~ ~~entry~~;		s = TemplUtl.boolang[ r ];
	if ~~not~~ ~~TemplUtl.lang~~ then		if type( s ) == "boolean" then
	-- ~~TODO:~~ ~~page language~~		r = s;
⚫	~~TemplUtl.lang~~ =
	mw.language.getContentLanguage():getCode();
	end		end
⚫	~~entry~~ = ~~TemplUtl.L10N[~~ TemplUtl.~~lang~~ ];
⚫	if type( ~~entry~~ ) == "~~table~~" then
⚫	s = ~~entry~~[ r ];
⚫	if type( s ) == "boolean" ~~then~~
⚫	r = s;
⚫	~~end~~
⚫	end
⚫	~~else~~
⚫	TemplUtl.~~L10N~~ = ~~true~~;
	end		end
	if type( r ) ~= "boolean" then		if type( r ) ~= "boolean" then
	if type( another ) ~~~= "nil" then~~		s = type( another );
			if s == "nil" then
			r = true;
			elseif s == "boolean" then
			r = another;
			else
	r = TemplUtl.faculty( another );		r = TemplUtl.faculty( another );
⚫	~~else~~
⚫	r = ~~true~~;
	end		end
	end		end
Zeile 696:		Zeile 706:
	item ) )		item ) )
	if type( entity ) == "table" then		if type( entity ) == "table" then
	local ~~vsn~~ = ~~entity:formatPropertyValues(~~ "P348" )		local seek = Failsafe.serialProperty or "P348"
			local vsn = entity:formatPropertyValues( seek )
	if type( vsn ) == "table" and		if type( vsn ) == "table" and
	type( vsn.value ) == "string" and		type( vsn.value ) == "string" and

PerfektesChaos: 2019-11-12

2019-11-18T22:29:07Z

2019-11-12

Änderungen zeigen

Artregor: Änderte den Schutzstatus für „Modul:TemplUtl“ ([Bearbeiten=Nur Sichter] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt))

2019-06-09T20:26:11Z

Änderte den Schutzstatus für „Modul:TemplUtl“ ([Bearbeiten=Nur Sichter] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt))

← Nächstältere Version	Version vom 9. Juni 2019, 21:26 Uhr
(kein Unterschied)

PerfektesChaos: 2019-06-09

2019-06-09T17:08:39Z

2019-06-09

@@ Zeile 1: / Zeile 1: @@
 local TemplUtl = { suite  = "TemplUtl",
-                   serial = "2019-06-06" };
+                   serial = "2019-06-09",
@@ Zeile 111: / Zeile 112: @@
-TemplUtl.failsafe = function ( assert )
+TemplUtl.failsafe = function ( atleast )
     local r
-    if not assert  or  assert <= TemplUtl.serial then
+    if since == "wikidata" then
-        r = TemplUtl.serial
+        local item = TemplUtl.item
     end
     return r
@@ Zeile 178: / Zeile 204: @@
             if not mw.title.equals( mw.title.getCurrentTitle(), t )  and
                t.exists then
-                t.getContent();
+                t:getContent();
             end
         end