Modul:Archivierung - Versionsgeschichte

PerfektesChaos: 2017-03-08

2017-03-08T16:13:18Z

2017-03-08

← Nächstältere Version		Version vom 8. März 2017, 18:13 Uhr
Zeile 245:		Zeile 245:

	Vorlagen.Autoarchiv.Frequenz = function ( assigned )		Vorlagen.Autoarchiv.Frequenz = function ( assigned )
			assigned="dienstags:mittags, sonntags:mittags"
	local syntax1 = "\|ständig\|" ..		local syntax1 = "\|ständig\|" ..
	"montags\|dienstags\|mittwochs\|donnerstags\|freitags\|samstags\|sonntags"		"montags\|dienstags\|mittwochs\|donnerstags\|freitags\|samstags\|sonntags"
Zeile 264:		Zeile 265:
	end		end
	if s:find( ":", 1, true ) then		if s:find( ":", 1, true ) then
	supply, slice = s:match( "^(.):(.)$", i )		supply, slice = s:match( "^(.):(.)$", 1 )
	else		else
	supply = s		supply = s

PerfektesChaos: 2017-03-08

2017-03-08T12:50:44Z

2017-03-08

← Nächstältere Version		Version vom 8. März 2017, 14:50 Uhr
Zeile 264:		Zeile 264:
	end		end
	if s:find( ":", 1, true ) then		if s:find( ":", 1, true ) then
	supply, slice = s:~~find~~( "^(.+):(.+)$", i )		supply, slice = s:match( "^(.):(.)$", i )
	else		else
	supply = s		supply = s
Zeile 272:		Zeile 272:
	if slice then		if slice then
	s = string.format( "\|%s\|", slice )		s = string.format( "\|%s\|", slice )
	if syntax2:find( s, 1, true ) then		if not syntax2:find( s, 1, true ) then
	r = string.format( "<code>%s:%s</code> %s",		r = string.format( "<code>%s:%s</code> %s",
	supply,		supply,

PerfektesChaos: 2017-03-08

2017-03-08T10:37:38Z

2017-03-08

@@ Zeile 173: / Zeile 173: @@
     return r
 end -- fit()
@@ Zeile 211: / Zeile 225: @@
     if not scream  and  now ~= move  and
        ( now < 2  or  now > 3  or  move < 2  or  move > 3 )  and
        ( now < 100   or  ( move ~= 4  and  move ~= 5  and
                            move ~= 100  and  move ~= 101 ) ) then
@@ Zeile 224: / Zeile 239: @@
 Vorlagen.Autoarchiv.clear = function ( assigned )
 end -- Vorlagen.Autoarchiv.clear()

PerfektesChaos: 2017-03-08

2017-03-08T10:09:59Z

2017-03-08

← Nächstältere Version		Version vom 8. März 2017, 12:09 Uhr
Zeile 197:		Zeile 197:
	-- Validate target namespace		-- Validate target namespace
	local now = Page.namespace		local now = Page.namespace
	local move = ~~template~~.nsn		local move = Vorlagen[ Selbst ].nsn or -999
	local scream		local scream
	if move <= 0 or now <= 0 then		if move <= 0 or now <= 0 then

PerfektesChaos: 2017-03-08

2017-03-08T10:04:21Z

2017-03-08

@@ Zeile 191: / Zeile 191: @@
     return r
 end -- focus()
@@ Zeile 240: / Zeile 269: @@
                 end
             end
             r = string.format( "<code>%s</code> unzulässig", supply )
         end
@@ Zeile 379: / Zeile 408: @@
             features()
             if not Schrei  and  template.nsn then
-                if template.nsn <= 0  or  Page.namespace <= 0 then
+                fromto()
-                    Schrei = "Ungeeigneter Namensraum"
+                if not Schrei  and  template.nsn == 1 then
                     local n = params.Mindestabschnitte.v
                     if n then

PerfektesChaos: 2017-03-08

2017-03-08T09:06:28Z

2017-03-08

← Nächstältere Version		Version vom 8. März 2017, 11:06 Uhr
Zeile 96:		Zeile 96:
	end		end
	elseif v.c == "l" then		elseif v.c == "l" then
	if set ~= "Ja" and set ~= "Nein" and set ~= "0" and		if set ~= "Ja" and set ~= "Nein" and set ~= "0" and
	set ~= "ja" and set ~= "nein" then		set ~= "ja" and set ~= "nein" then
	scream = "nicht 'logisch'"		scream = "nicht 'logisch'"
	end		end
Zeile 103:		Zeile 103:
	scream = template[ k ]( set )		scream = template[ k ]( set )
	elseif v.c == "p" then		elseif v.c == "p" then
	if not set:find( ":", 1, true ) ~~then~~		if not set:find( ":", 1, true ) and
			not set:find( "[[/", 1, true ) then
	scream = "Kein Seitenname enthalten"		scream = "Kein Seitenname enthalten"
	end		end
Zeile 391:		Zeile 392:
	if Page.namespace < 2 or Page.namespace > 3 or		if Page.namespace < 2 or Page.namespace > 3 or
	template.nsn < 2 or template.nsn > 3 then		template.nsn < 2 or template.nsn > 3 then
	~~Schrei~~ = ~~"Namensraumkombination~~ ~~unerwünscht"~~		if Page.namespace < 100 or
			( template.nsn ~= 4 and
			template.nsn ~= 5 ) then
			Schrei = "Namensraumkombination unerwünscht"
			end
	end		end
	end		end

PerfektesChaos: 2017-03-08

2017-03-08T08:48:34Z

2017-03-08

← Nächstältere Version		Version vom 8. März 2017, 10:48 Uhr
Zeile 396:		Zeile 396:
	if Schrei then		if Schrei then
	Kategorien.Namensraum = true		Kategorien.Namensraum = true
	elseif template.nsn == 1 ~~and~~		elseif template.nsn == 1 then
	( params.Mindestabschnitte.v ~~or 0 ) < 3 and~~		local n = params.Mindestabschnitte.v
	~~figure() < 2000~~ then		if n then
	~~Kategorien.Frequenz~~ = ~~true~~		n = tonumber( n )
			else
			n = 0
			end
			if n < 3 and figure() < 2000 then
			Kategorien.Frequenz = true
			end
	end		end
	if params.Kopfvorlage.v then		if params.Kopfvorlage.v then

PerfektesChaos: 2017-03-08

2017-03-08T08:42:20Z

2017-03-08

← Nächstältere Version		Version vom 8. März 2017, 10:42 Uhr
Zeile 1:		Zeile 1:
	--[=[ 2017-03-07		--[=[ 2017-03-08
	Vorlagen zur Archivierung		Vorlagen zur Archivierung
	]=]		]=]
Zeile 5:		Zeile 5:


	local Kategorien = { ~~Kopfvorlage~~ = false,		local Kategorien = { Frequenz = false,
			Kopfvorlage = false,
	Namensraum = false,		Namensraum = false,
	Parameter = false }		Parameter = false }
	local Vorlagen = { }		local Vorlagen = { }
	local Page, Schrei, Selbst		local Frame, Page, Schrei, Selbst
	Vorlagen.Autoarchiv =		Vorlagen.Autoarchiv =
	{ p = { ["aktuelles Archiv"] = { c = "p" },		{ p = { ["aktuelles Archiv"] = { c = "p" },
Zeile 117:		Zeile 118:
	Kategorien.Parameter = true		Kategorien.Parameter = true
	end		end
	~~Schrei~~ ~~= string.format~~( ~~"%s<code>%s~~=~~</code>~~ %s",		if scream:sub( 1,1 ) ~= "<" then
			scream = " " .. scream
			end
			Schrei = string.format( "%s<code>%s=</code>%s",
	Schrei, k, scream )		Schrei, k, scream )
	scream = false		scream = false
Zeile 124:		Zeile 128:
	end -- for k, v		end -- for k, v
	end -- features()		end -- features()



			local function figure()
			-- Retrieve current page size
			-- Returns number
			local r
			if not Page then
			Page = mw.title.getCurrentTitle()
			end
			if Page.id > 0 then
			if not Frame then
			Frame = mw.getCurrentFrame()
			end
			r = Frame:callParserFunction( "PAGESIZE",
			{ Page.prefixedText, "R" } )
			r = tonumber( r ) or 0
			else
			r = 0
			end
			return r
			end -- figure()



	local function fit( arglist )		local function fit( arglist )
			-- Store parameter values
			-- Returns table with unknown parameter names, or nil
	local params = Vorlagen[ Selbst ].p		local params = Vorlagen[ Selbst ].p
	local r		local r
Zeile 149:		Zeile 177:
	local function focus()		local function focus()
	-- Format return string		-- Format return string
			-- Returns string
	local r = fault()		local r = fault()
	for k, v in pairs( Kategorien ) do		for k, v in pairs( Kategorien ) do
Zeile 168:		Zeile 197:
	local r		local r
	if not s:find( string.format( "\|%s\|", assigned ), 1, true ) then		if not s:find( string.format( "\|%s\|", assigned ), 1, true ) then
	r = "~~<code>clear=</code>~~ unzulässig"		r = "unzulässig"
	end		end
	return r		return r
Zeile 225:		Zeile 254:
	local r		local r
	if assigned ~= "Alter" then		if assigned ~= "Alter" then
	if assigned:find( "~~Erledigt~~"~~, 1, true~~ ) then		if assigned:find( "[Ee]rledigt" ) then
	if assigned ~= "Erledigt" and		if assigned ~= "Erledigt" and
	~~not~~ assigned~~:match(~~ "~~^Alter, *Erledigt$~~" ) ~~then~~		assigned ~= "erledigt" and
	~~r =~~ "~~'<code>Modus=~~Alter, ~~Erledigt</code>'~~"		not assigned:match( "^Alter, *[Ee]rledigt$" ) then
			r = "<code>Alter, Erledigt</code>"
	end		end
	else		else
	r = "~~<code>Modus=</code>~~ unzulässig"		r = "unzulässig"
	end		end
	end		end
Zeile 331:		Zeile 361:


	Vorlagen.Autoarchiv.fire = function ( arglist )		Vorlagen.Autoarchiv.fire = function ( arglist, frame )
	local template = Vorlagen.Autoarchiv		local template = Vorlagen.Autoarchiv
	local params = template.p		local params = template.p
	local unknown		local unknown
			Frame = frame
	Selbst = "Autoarchiv"		Selbst = "Autoarchiv"
	unknown = fit( arglist )		unknown = fit( arglist )
Zeile 357:		Zeile 388:
	end		end
	end		end
	if Schrei or template.nsn ~= Page.namespace then		if not Schrei and template.nsn ~= Page.namespace then
			if Page.namespace < 2 or Page.namespace > 3 or
			template.nsn < 2 or template.nsn > 3 then
			Schrei = "Namensraumkombination unerwünscht"
			end
			end
			if Schrei then
	Kategorien.Namensraum = true		Kategorien.Namensraum = true
			elseif template.nsn == 1 and
			( params.Mindestabschnitte.v or 0 ) < 3 and
			figure() < 2000 then
			Kategorien.Frequenz = true
	end		end
	if params.Kopfvorlage.v then		if params.Kopfvorlage.v then
Zeile 379:		Zeile 420:
	p.Autoarchiv = function ( frame )		p.Autoarchiv = function ( frame )
	local lucky, r = pcall( Vorlagen.Autoarchiv.fire,		local lucky, r = pcall( Vorlagen.Autoarchiv.fire,
	frame:getParent().args )		frame:getParent().args,
			frame )
	if not lucky then		if not lucky then
	r = "[[Kategorie:Wikipedia:Vorlagenfehler/Vorlage:Autoarchiv]]"		r = "[[Kategorie:Wikipedia:Vorlagenfehler/Vorlage:Autoarchiv]]"

PerfektesChaos: 2017-03-07

2017-03-07T15:58:13Z

2017-03-07

← Nächstältere Version		Version vom 7. März 2017, 17:58 Uhr
Zeile 339:		Zeile 339:
	if unknown then		if unknown then
	failures( unknown )		failures( unknown )
		⚫	else
	elseif params.Alter.v and params.Ziel.v then
	~~template.Ziel()~~		if not Page then
	~~features~~()		Page = mw.title.getCurrentTitle()
		⚫	end
⚫	if ~~not~~ ~~Schrei~~ ~~and~~ template.nsn then
	~~if not Page~~ then		if params.Alter.v and params.Ziel.v then
	~~Page = mw~~.~~title.getCurrentTitle~~()		template.Ziel()
	~~end~~		features()
	if ~~template.nsn~~ <= 0 or ~~Page~~.~~namespace <= 0~~ then		if not Schrei and template.nsn then
	~~Schrei~~ = ~~"Ungeeigneter~~ ~~Namensraum"~~		if template.nsn <= 0 or Page.namespace <= 0 then
	~~elseif~~ ~~template.nsn%2~~ == 0 ~~then~~		Schrei = "Ungeeigneter Namensraum"
	if template.nsn ~= ~~4 and template.nsn ~~~= ~~100~~ ~~and~~		elseif template.nsn%2 == 0 then
	template.nsn ~= 2 and template.nsn ~= 12 ~~then~~		if template.nsn ~= 4 and
			template.nsn ~= 100 and
	~~Schrei~~ = ~~"Unerwarteter~~ ~~Namensraum"~~		template.nsn ~= 2 and
		⚫	template.nsn ~= 12 then
			Schrei = "Unerwarteter Namensraum"
			end
			end
			if Schrei or template.nsn ~= Page.namespace then
		⚫	Kategorien.Namensraum = true
			end
		⚫	if params.Kopfvorlage.v then
		⚫	Kategorien.Kopfvorlage = true
	end		end
	end		end
	~~if Schrei or template~~.~~nsn~~ ~= ~~Page.namespace~~ then		elseif Page.namespace ~= 10 then
	~~Kategorien.Namensraum = true~~		Schrei = "Pflichtparameter fehlt"
	~~end~~		Kategorien.Parameter = true
⚫	if params.Kopfvorlage.v then
⚫	Kategorien.~~Kopfvorlage~~ = true
⚫	end
	end		end
⚫	else
	Schrei = "Pflichtparameter fehlt"
⚫	Kategorien.~~Parameter~~ = true
	end		end
	return focus()		return focus()

PerfektesChaos: 2017-03-07

2017-03-07T15:49:21Z

2017-03-07

← Nächstältere Version		Version vom 7. März 2017, 17:49 Uhr
Zeile 95:		Zeile 95:
	end		end
	elseif v.c == "l" then		elseif v.c == "l" then
	if set ~= "Ja" and set ~= "Nein" and set ~= "0" ~~then~~		if set ~= "Ja" and set ~= "Nein" and set ~= "0" and
			set ~= "ja" and set ~= "nein" then
	scream = "nicht 'logisch'"		scream = "nicht 'logisch'"
	end		end
Zeile 348:		Zeile 349:
	Schrei = "Ungeeigneter Namensraum"		Schrei = "Ungeeigneter Namensraum"
	elseif template.nsn%2 == 0 then		elseif template.nsn%2 == 0 then
	if template.nsn ~= 4 and template.nsn ~= 100 ~~then~~		if template.nsn ~= 4 and template.nsn ~= 100 and
			template.nsn ~= 2 and template.nsn ~= 12 then
	Schrei = "Unerwarteter Namensraum"		Schrei = "Unerwarteter Namensraum"
	end		end