Modul:Vorlage:LuaModuleDoc: Unterschied zwischen den Versionen

local LuaModuleDoc = { suite  = "LuaModuleDoc",

--[=[

Support {{LuaModuleDoc}}

* failsafe()

]=]

     --    arg    -- string or number; argument identifier

     --    assign  -- any, optional; default value

     if type( r ) ~= "string" then

         if assign == nil then

     --    string

     -- Uses:

     --    fetch()

     -- MediaWiki:Move-leave-redirect  Weiterleitung erstellen

         end

         path  = { sub,  mw.uri.buildQueryString( create ) }

         show  = mw.message.new( show ):plain()

         button = mw.title.makeTitle( mw.site.namespaces.Template.id,

                       Link    = r,

                       Text    = show }

         else

             r = string.format( "<br>[%s '''%s''']", r, show )

     --    script  -- string; module name (main)

     -- Uses:

     --    fetch()

     -- Return:

     --    string

     local entity = mw.wikibase.getEntity()

     local r

                     t = mw.title.makeTitle( space, s )

                     s = "//" .. repo.host

                       mw.site.server:find( s, 1, true ) then

                         mode = 2

             s = fetch( "templateGlobal", "" )

             if #s > 0 then

                 local vsn = entity:formatPropertyValues( "P348" )

                 params = { }

                     params.update = "1"

                 end

             end

         end

     -- Most interesting test and development page

     -- Precondition:

     --    start  -- string; central documentation root

     --    script  -- string; basic module name

     --    string or false:  full page name, if any

     -- Uses:

     --    mw.title.makeTitle()

     local r  = false

     local sub = "/" .. fetch( "subTest", "Test" )

     --    specific  -- string, optional; additional information

     -- Uses:

     --    fetch()

     local show = fetch( "pageErr" )

             table.insert( pars, specific )

         end

     else

         local e = mw.html.create( "span" )

     -- Analyze languages

     -- Precondition:

     --    current page is supposed to transclude LuaModuleDoc

     --    start  -- string; central documentation root

     --    script  -- string; basic module name

     -- Uses:

     --    fetch()

     --    navLang()

     --    mw.title.makeTitle()

     local e, i, s, t

     local specified = fetch( "langsRequest", false )

     local super    = start .. "/" .. script .. "/"

     if type( specified ) == "string" then

         if specified:match( "^%s*$" ) then

         end

     end

     end

         s = e[ 1 ]

         if e[ 2 ] then

             if not t.exists then

                 s = false

         end

         if s then

         else

         end

     end -- for i -1

end -- navLangs()

     -- Include various external content into page

     -- Precondition:

     --    start  -- string; defined pageDocRoot argument

     --    swift  -- string; defined pageNav argument

     --    script  -- string; module name (main)

     --    sub    -- string or false; possible sub-module name

     --    lead    -- true: Module: namespace;  false: text namespace

     -- Uses:

     --    navError()

     --    mw.title.makeTitle()

     --    createPage()

     --    fetch()

     if t then

         collect.Test = t

     end

         s = string.format( "%s/%s", start, script )

         elseif sub then

             collect.subDoc = sub

             collect.subModule = sub

             s = string.format( "%s/%s/%s", start, script, sub )

                 s = string.format( "%s/%s", s, collect[ 3 ] )

                 if t.exists then

                 end

             end

     elseif lead and sub then

         s = string.format( "%s/%s/%s", start, script, sub )

         if t.exists then

             collect.subDoc = sub

         end

     end

     if not low then

             local doc

             s  = string.format( "%s/%s", start, script )

             if not doc.exists then

                 r = r .. createPage( "NoPageCentral",

                                     doc.prefixedText,

                                     start,

                                     script )

                 t = false

             if super then

                 s = "NoTalkCentral"

                 s = false

             else

                                               t.prefixedText,

                                               start,

                                               script ) )

             end

         local space, sub, support

         for i = 3, #collect do

             s = t:getContent()

             if s then

                 else

                     r = r ..

                     break    -- for i

                 end

                     swift = string.format( "%s/%s", swift, sub )

                 end

             end

         end

     -- Return navigation text; analyze page location

     -- Precondition:

     --    current namespace will support LuaModuleDoc

     --    lead    -- true: Module: namespace;  false: text namespace

     -- Uses:

     --    fetch()

     --    navError()

     local r

     local start = fetch( "pageDocRoot" )

         end

         s = s .. "([^/]+)/(.*/?)$"

         if type( script ) == "string" then

             local sub  = false

             local swift = fetch( "pageNav" )

             if type( s ) == "string" then

                 if #s > 1 then

                     if q.exists and q.contentModel == "Scribunto" then

                         sub = s

                     end

                 end

             end

             if type( swift ) == "string" then

             else

                 r = navError( "configMissing", "pageNav" )

             end

         else

         end

     else

     -- Start execution; return navigation text; analyze namespace

     -- Uses:

     --    fetch()

     --    mw.title.getCurrentTitle()

     local nsDocs = fetch( "nsDocs" )

     if nsDocs then

         else

             r = navError( "BadNamespace" )

     return  r

end -- navigation()

-- Provide template access

local p = {}

function p.nav( frame )

     -- Uses:

     --    navigation()

     local lucky, r

     lucky, r = pcall( navigation )

     if not lucky then

end

end -- p.failsafe()

return p