Beda: 1 Version importiert

2021-03-23T14:19:47Z

1 Version importiert

de>PerfektesChaos: 2017-10-01

2017-10-09T13:26:22Z

2017-10-01

Neue Seite

--[=[ 2017-10-01
Module:Text test
]=]

local Handler = { }
local Text = { }
local QuoteLang = false
local QuoteType = false

local function fault( a )
-- Formatiere Fehler mit class=error
-- Parameter:
-- a -- string mit Text
return string.format( "<span class=\"error\">%s</span>", a )
end -- fault()

Handler.quoteTable = function ( args, frame )
local longer = ( args.QuoteType == "1" )
local order = { }
local r = Text.test( "quote" )
local strip = [==[
|-
| <code>%%s</code>
| {{#language:%%s|%s}}
|class="hintergrundfarbe8"| <code>{{#invoke:Text|quoteUnquoted|1|%%s|1}}</code>
|class="hintergrundfarbe8"| <code>{{#invoke:Text|quoteUnquoted|2|%%s|2}}</code>
]==]
local s, slang, slot, v1, v2
QuoteLang = r.QuoteLang
QuoteType = r.QuoteType
r = [==[
{| class="wikitable sortable"
|-
! lang !! Name !! 1 !! 2
]==]
if not frame then
frame = mw.getCurrentFrame()
end
if longer then
r = r .. "! code\n"
strip = strip .. "| <code>%%s</code>\n"
end
slang = frame:preprocess( "{{int:lang}}" )
strip = string.format( strip, slang )
for k, v in pairs( QuoteLang ) do
table.insert( order, k )
end -- for k, v in QuoteLang
table.sort( order )
for k, v in pairs( order ) do
slot = QuoteLang[ v ]
if type( slot ) == "string" then
v1, v2 = v:match( "^(%l+)%-(%l+)$" )
if v1 then
if #v2 == 2 then
v2 = v2:upper()
else
v2 = v2:sub( 1, 1 ):upper() .. v2:sub( 2 )
end
s = string.format( "%s-%s", v1, v2 )
else
s = v
end
if longer then
s = string.format( strip, s, v, v, v, slot )
else
s = string.format( strip, s, v, v, v )
end
r = r .. frame:preprocess( s )
else
r = r .. "\n|-\n!" .. tostring( k )
end
end -- for k, v in order
r = r .. "\n|}"
if longer then
r = r .. [==[

{| class="wikitable sortable"
! code !!colspan="3"| 1 !!colspan="3"| 2
]==]
for k, v in pairs( QuoteType ) do
if type( v ) == "table" then
v1 = v[ 1 ]
v2 = v[ 2 ]
if type( v1 ) == "table" then
s = string.format( "%s1%s||%d||%d",
mw.ustring.char( v1[ 1 ] ),
mw.ustring.char( v1[ 2 ] ),
v1[ 1 ],
v1[ 2 ] )
else
s = "???"
end
s = s .. "||"
if type( v2 ) == "table" then
s = string.format( "%s%s2%s||%d||%d",
s,
mw.ustring.char( v2[ 1 ] ),
mw.ustring.char( v2[ 2 ] ),
v2[ 1 ],
v2[ 2 ] )
else
s = s .. "???"
end
else
s = "??????????"
end
r = string.format( "%s\n|-\n|<code>%s</code>||%s", r, k, s )
end -- for k, v in QuoteType
r = r .. "\n|}"
end
return r
end -- Handler.quoteTable()

-- Export
local p = { }

function p.test( frame )
local lucky, r
lucky, Text = pcall( require, "Module:Text" )
if type( Text ) == "table" then
local suite
if type( frame ) == "string" then
suite = frame
else
suite = frame.args[ 1 ]
end
Text = Text.Text()
if type( Handler[ suite ] ) == "function" then
r = Handler[ suite ]( frame.args, frame )
else
r = fault( "Unkown Handler: " .. suite )
end
else
r = fault( Text )
end
return r
end -- p.test()

return p

← Nächstältere Version	Version vom 23. März 2021, 14:19 Uhr
(kein Unterschied)

Modul:Text/test - Versionsgeschichte

Beda: 1 Version importiert

de>PerfektesChaos: 2017-10-01