-- This module implements {{documentation}}.-- Get required modules.localgetArgs=require('Módulo:Arguments').getArgs-- Get the config table.localcfg=mw.loadData('Módulo:Documentação/config')localp={}-- Often-used functions.localugsub=mw.ustring.gsub------------------------------------------------------------------------------ Helper functions---- These are defined as local functions, but are made available in the p-- table for testing purposes.----------------------------------------------------------------------------localfunctionmessage(cfgKey,valArray,expectType)--[[-- Gets a message from the cfg table and formats it if appropriate.-- The function raises an error if the value from the cfg table is not-- of the type expectType. The default type for expectType is 'string'.-- If the table valArray is present, strings such as $1, $2 etc. in the-- message are substituted with values from the table keys [1], [2] etc.-- For example, if the message "foo-message" had the value 'Foo $2 bar $1.',-- message('foo-message', {'baz', 'qux'}) would return "Foo qux bar baz."--]]localmsg=cfg[cfgKey]expectType=expectTypeor'string'iftype(msg)~=expectTypethenerror('message: type error in message cfg.'..cfgKey..' ('..expectType..' expected, got '..type(msg)..')',2)endifnotvalArraythenreturnmsgendlocalfunctiongetMessageVal(match)match=tonumber(match)returnvalArray[match]orerror('message: no value found for key $'..match..' in message cfg.'..cfgKey,4)endreturnugsub(msg,'$([1-9][0-9]*)',getMessageVal)endp.message=messagelocalfunctionmakeWikilink(page,display)ifdisplaythenreturnmw.ustring.format('[[%s|%s]]',page,display)elsereturnmw.ustring.format('[[%s]]',page)endendp.makeWikilink=makeWikilinklocalfunctionmakeCategoryLink(cat,sort)localcatns=mw.site.namespaces[14].namereturnmakeWikilink(catns..':'..cat,sort)endp.makeCategoryLink=makeCategoryLinklocalfunctionmakeUrlLink(url,display)returnmw.ustring.format('[%s %s]',url,display)endp.makeUrlLink=makeUrlLinklocalfunctionmakeToolbar(...)localret={}locallim=select('#',...)iflim<1thenreturnnilendfori=1,limdoret[#ret+1]=select(i,...)end-- 'documentation-toolbar'return'<span class="'..message('toolbar-class')..'">('..table.concat(ret,' | ')..')</span>'endp.makeToolbar=makeToolbar------------------------------------------------------------------------------ Argument processing----------------------------------------------------------------------------localfunctionmakeInvokeFunc(funcName)returnfunction(frame)localargs=getArgs(frame,{valueFunc=function(key,value)iftype(value)=='string'thenvalue=value:match('^%s*(.-)%s*$')-- Remove whitespace.ifkey=='heading'orvalue~=''thenreturnvalueelsereturnnilendelsereturnvalueendend})returnp[funcName](args)endend------------------------------------------------------------------------------ Entry points----------------------------------------------------------------------------functionp.nonexistent(frame)ifmw.title.getCurrentTitle().subpageText=='testcases'thenreturnframe:expandTemplate{title='module test cases notice'}elsereturnp.main(frame)endendp.main=makeInvokeFunc('_main')functionp._main(args)--[[-- This function defines logic flow for the module.-- @args - table of arguments passed by the user--]]localenv=p.getEnvironment(args)localroot=mw.html.create()root:wikitext(p._getModuleWikitext(args,env)):wikitext(p.protectionTemplate(env)):wikitext(p.sandboxNotice(args,env)):tag('div')-- 'documentation-container':addClass(message('container')):attr('role','complementary'):attr('aria-labelledby',args.heading~=''and'documentation-heading'ornil):attr('aria-label',args.heading==''and'Documentation'ornil):newline():tag('div')-- 'documentation':addClass(message('main-div-classes')):newline():wikitext(p._startBox(args,env)):wikitext(p._content(args,env)):tag('div')-- 'documentation-clear':addClass(message('clear')):done():newline():done():wikitext(p._endBox(args,env)):done():wikitext(p.addTrackingCategories(env))-- 'Módulo:Documentation/styles.css'returnmw.getCurrentFrame():extensionTag('templatestyles','',{src=cfg['templatestyles']})..tostring(root)end------------------------------------------------------------------------------ Environment settings----------------------------------------------------------------------------functionp.getEnvironment(args)--[[-- Returns a table with information about the environment, including title-- objects and other namespace- or path-related data.-- @args - table of arguments passed by the user---- Title objects include:-- env.title - the page we are making documentation for (usually the current title)-- env.templateTitle - the template (or module, file, etc.)-- env.docTitle - the /doc subpage.-- env.sandboxTitle - the /sandbox subpage.-- env.testcasesTitle - the /testcases subpage.---- Data includes:-- env.protectionLevels - the protection levels table of the title object.-- env.subjectSpace - the number of the title's subject namespace.-- env.docSpace - the number of the namespace the title puts its documentation in.-- env.docpageBase - the text of the base page of the /doc, /sandbox and /testcases pages, with namespace.-- env.compareUrl - URL of the Special:ComparePages page comparing the sandbox with the template.---- All table lookups are passed through pcall so that errors are caught. If an error occurs, the value-- returned will be nil.--]]localenv,envFuncs={},{}-- Set up the metatable. If triggered we call the corresponding function in the envFuncs table. The value-- returned by that function is memoized in the env table so that we don't call any of the functions-- more than once. (Nils won't be memoized.)setmetatable(env,{__index=function(t,key)localenvFunc=envFuncs[key]ifenvFuncthenlocalsuccess,val=pcall(envFunc)ifsuccessthenenv[key]=val-- Memoise the value.returnvalendendreturnnilend})functionenvFuncs.title()-- The title object for the current page, or a test page passed with args.page.localtitlelocaltitleArg=args.pageiftitleArgthentitle=mw.title.new(titleArg)elsetitle=mw.title.getCurrentTitle()endreturntitleendfunctionenvFuncs.templateTitle()--[[-- The template (or module, etc.) title object.-- Messages:-- 'sandbox-subpage' --> 'sandbox'-- 'testcases-subpage' --> 'testcases'--]]localsubjectSpace=env.subjectSpacelocaltitle=env.titlelocalsubpage=title.subpageTextifsubpage==message('sandbox-subpage')orsubpage==message('testcases-subpage')thenreturnmw.title.makeTitle(subjectSpace,title.baseText)elsereturnmw.title.makeTitle(subjectSpace,title.text)endendfunctionenvFuncs.docTitle()--[[-- Title object of the /doc subpage.-- Messages:-- 'doc-subpage' --> 'doc'--]]localtitle=env.titlelocaldocname=args[1]-- User-specified doc page.localdocpageifdocnamethendocpage=docnameelsedocpage=env.docpageBase..'/'..message('doc-subpage')endreturnmw.title.new(docpage)endfunctionenvFuncs.sandboxTitle()--[[-- Title object for the /sandbox subpage.-- Messages:-- 'sandbox-subpage' --> 'sandbox'--]]returnmw.title.new(env.docpageBase..'/'..message('sandbox-subpage'))endfunctionenvFuncs.testcasesTitle()--[[-- Title object for the /testcases subpage.-- Messages:-- 'testcases-subpage' --> 'testcases'--]]returnmw.title.new(env.docpageBase..'/'..message('testcases-subpage'))endfunctionenvFuncs.protectionLevels()-- The protection levels table of the title object.returnenv.title.protectionLevelsendfunctionenvFuncs.subjectSpace()-- The subject namespace number.returnmw.site.namespaces[env.title.namespace].subject.idendfunctionenvFuncs.docSpace()-- The documentation namespace number. For most namespaces this is the-- same as the subject namespace. However, pages in the Article, File,-- MediaWiki or Category namespaces must have their /doc, /sandbox and-- /testcases pages in talk space.localsubjectSpace=env.subjectSpaceifsubjectSpace==0orsubjectSpace==6orsubjectSpace==8orsubjectSpace==14thenreturnsubjectSpace+1elsereturnsubjectSpaceendendfunctionenvFuncs.docpageBase()-- The base page of the /doc, /sandbox, and /testcases subpages.-- For some namespaces this is the talk page, rather than the template page.localtemplateTitle=env.templateTitlelocaldocSpace=env.docSpacelocaldocSpaceText=mw.site.namespaces[docSpace].name-- Assemble the link. docSpace is never the main namespace, so we can hardcode the colon.returndocSpaceText..':'..templateTitle.textendfunctionenvFuncs.compareUrl()-- Diff link between the sandbox and the main template using [[Special:ComparePages]].localtemplateTitle=env.templateTitlelocalsandboxTitle=env.sandboxTitleiftemplateTitle.existsandsandboxTitle.existsthenlocalcompareUrl=mw.uri.fullUrl('Special:ComparePages',{page1=templateTitle.prefixedText,page2=sandboxTitle.prefixedText})returntostring(compareUrl)elsereturnnilendendreturnenvend------------------------------------------------------------------------------ Auxiliary templates----------------------------------------------------------------------------p.getModuleWikitext=makeInvokeFunc('_getModuleWikitext')functionp._getModuleWikitext(args,env)localcurrentTitle=mw.title.getCurrentTitle()ifcurrentTitle.contentModel~='Scribunto'thenreturnendpcall(require,currentTitle.prefixedText)-- if it fails, we don't carelocalmoduleWikitext=package.loaded["Módulo:Module wikitext"]ifmoduleWikitextthenreturnmoduleWikitext.main()endendfunctionp.sandboxNotice(args,env)--[=[-- Generates a sandbox notice for display above sandbox pages.-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironment---- Messages:-- 'sandbox-notice-image' --> '[[Image:Sandbox.svg|50px|alt=|link=]]'-- 'sandbox-notice-blurb' --> 'This is the $1 for $2.'-- 'sandbox-notice-diff-blurb' --> 'This is the $1 for $2 ($3).'-- 'sandbox-notice-pagetype-template' --> '[[Wikipedia:Template test cases|template sandbox]] page'-- 'sandbox-notice-pagetype-module' --> '[[Wikipedia:Template test cases|module sandbox]] page'-- 'sandbox-notice-pagetype-other' --> 'sandbox page'-- 'sandbox-notice-compare-link-display' --> 'diff'-- 'sandbox-notice-testcases-blurb' --> 'See also the companion subpage for $1.'-- 'sandbox-notice-testcases-link-display' --> 'test cases'-- 'sandbox-category' --> 'Template sandboxes'--]=]localtitle=env.titlelocalsandboxTitle=env.sandboxTitlelocaltemplateTitle=env.templateTitlelocalsubjectSpace=env.subjectSpaceifnot(subjectSpaceandtitleandsandboxTitleandtemplateTitleandmw.title.equals(title,sandboxTitle))thenreturnnilend-- Build the table of arguments to pass to {{ombox}}. We need just two fields, "image" and "text".localomargs={}omargs.image=message('sandbox-notice-image')-- Get the text. We start with the opening blurb, which is something like-- "This is the template sandbox for [[Predefinição:Foo]] (diff)."localtext=''localpagetypeifsubjectSpace==10thenpagetype=message('sandbox-notice-pagetype-template')elseifsubjectSpace==828thenpagetype=message('sandbox-notice-pagetype-module')elsepagetype=message('sandbox-notice-pagetype-other')endlocaltemplateLink=makeWikilink(templateTitle.prefixedText)localcompareUrl=env.compareUrlifcompareUrlthenlocalcompareDisplay=message('sandbox-notice-compare-link-display')localcompareLink=makeUrlLink(compareUrl,compareDisplay)text=text..message('sandbox-notice-diff-blurb',{pagetype,templateLink,compareLink})elsetext=text..message('sandbox-notice-blurb',{pagetype,templateLink})end-- Get the test cases page blurb if the page exists. This is something like-- "See also the companion subpage for [[Predefinição:Foo/testcases|test cases]]."localtestcasesTitle=env.testcasesTitleiftestcasesTitleandtestcasesTitle.existstheniftestcasesTitle.contentModel=="Scribunto"thenlocaltestcasesLinkDisplay=message('sandbox-notice-testcases-link-display')localtestcasesRunLinkDisplay=message('sandbox-notice-testcases-run-link-display')localtestcasesLink=makeWikilink(testcasesTitle.prefixedText,testcasesLinkDisplay)localtestcasesRunLink=makeWikilink(testcasesTitle.talkPageTitle.prefixedText,testcasesRunLinkDisplay)text=text..'<br />'..message('sandbox-notice-testcases-run-blurb',{testcasesLink,testcasesRunLink})elselocaltestcasesLinkDisplay=message('sandbox-notice-testcases-link-display')localtestcasesLink=makeWikilink(testcasesTitle.prefixedText,testcasesLinkDisplay)text=text..'<br />'..message('sandbox-notice-testcases-blurb',{testcasesLink})endend-- Add the sandbox to the sandbox category.omargs.text=text..makeCategoryLink(message('sandbox-category'))-- 'documentation-clear'return'<div class="'..message('clear')..'"></div>'..require('Módulo:Message box').main('ombox',omargs)endfunctionp.protectionTemplate(env)-- Generates the padlock icon in the top right.-- @env - environment table containing title objects, etc., generated with p.getEnvironment-- Messages:-- 'protection-template' --> 'pp-template'-- 'protection-template-args' --> {docusage = 'yes'}localprotectionLevels=env.protectionLevelsifnotprotectionLevelsthenreturnnilendlocaleditProt=protectionLevels.editandprotectionLevels.edit[1]localmoveProt=protectionLevels.moveandprotectionLevels.move[1]ifeditProtthen-- The page is edit-protected.returnrequire('Módulo:Protection banner')._main{message('protection-reason-edit'),small=true}elseifmoveProtandmoveProt~='autoconfirmed'then-- The page is move-protected but not edit-protected. Exclude move-- protection with the level "autoconfirmed", as this is equivalent to-- no move protection at all.returnrequire('Módulo:Protection banner')._main{action='move',small=true}elsereturnnilendend------------------------------------------------------------------------------ Start box----------------------------------------------------------------------------p.startBox=makeInvokeFunc('_startBox')functionp._startBox(args,env)--[[-- This function generates the start box.-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironment---- The actual work is done by p.makeStartBoxLinksData and p.renderStartBoxLinks which make-- the [view] [edit] [history] [purge] links, and by p.makeStartBoxData and p.renderStartBox-- which generate the box HTML.--]]env=envorp.getEnvironment(args)locallinkslocalcontent=args.contentifnotcontentorargs[1]then-- No need to include the links if the documentation is on the template page itself.locallinksData=p.makeStartBoxLinksData(args,env)iflinksDatathenlinks=p.renderStartBoxLinks(linksData)endend-- Generate the start box html.localdata=p.makeStartBoxData(args,env,links)ifdatathenreturnp.renderStartBox(data)else-- User specified no heading.returnnilendendfunctionp.makeStartBoxLinksData(args,env)--[[-- Does initial processing of data to make the [view] [edit] [history] [purge] links.-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironment---- Messages:-- 'view-link-display' --> 'view'-- 'edit-link-display' --> 'edit'-- 'history-link-display' --> 'history'-- 'purge-link-display' --> 'purge'-- 'module-preload' --> 'Predefinição:Documentation/preload-module-doc'-- 'docpage-preload' --> 'Predefinição:Documentation/preload'-- 'create-link-display' --> 'create'--]]localsubjectSpace=env.subjectSpacelocaltitle=env.titlelocaldocTitle=env.docTitleifnottitleornotdocTitlethenreturnnilendifdocTitle.isRedirectthendocTitle=docTitle.redirectTargetendlocaldata={}data.title=titledata.docTitle=docTitle-- View, display, edit, and purge links if /doc exists.data.viewLinkDisplay=message('view-link-display')data.editLinkDisplay=message('edit-link-display')data.historyLinkDisplay=message('history-link-display')data.purgeLinkDisplay=message('purge-link-display')-- Create link if /doc doesn't exist.localpreload=args.preloadifnotpreloadthenifsubjectSpace==828then-- Module namespacepreload=message('module-preload')elsepreload=message('docpage-preload')endenddata.preload=preloaddata.createLinkDisplay=message('create-link-display')returndataendfunctionp.renderStartBoxLinks(data)--[[-- Generates the [view][edit][history][purge] or [create][purge] links from the data table.-- @data - a table of data generated by p.makeStartBoxLinksData--]]localfunctionescapeBrackets(s)-- Escapes square brackets with HTML entities.s=s:gsub('%[','[')-- Replace square brackets with HTML entities.s=s:gsub('%]',']')returnsendlocalretlocaldocTitle=data.docTitlelocaltitle=data.titlelocalpurgeLink=makeUrlLink(title:fullUrl{action='purge'},data.purgeLinkDisplay)ifdocTitle.existsthenlocalviewLink=makeWikilink(docTitle.prefixedText,data.viewLinkDisplay)localeditLink=makeUrlLink(docTitle:fullUrl{action='edit'},data.editLinkDisplay)localhistoryLink=makeUrlLink(docTitle:fullUrl{action='history'},data.historyLinkDisplay)ret='[%s] [%s] [%s] [%s]'ret=escapeBrackets(ret)ret=mw.ustring.format(ret,viewLink,editLink,historyLink,purgeLink)elselocalcreateLink=makeUrlLink(docTitle:fullUrl{action='edit',preload=data.preload},data.createLinkDisplay)ret='[%s] [%s]'ret=escapeBrackets(ret)ret=mw.ustring.format(ret,createLink,purgeLink)endreturnretendfunctionp.makeStartBoxData(args,env,links)--[=[-- Does initial processing of data to pass to the start-box render function, p.renderStartBox.-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironment-- @links - a string containing the [view][edit][history][purge] links - could be nil if there's an error.---- Messages:-- 'documentation-icon-wikitext' --> '[[File:Test Template Info-Icon - Version (2).svg|50px|link=|alt=]]'-- 'template-namespace-heading' --> 'Template documentation'-- 'module-namespace-heading' --> 'Module documentation'-- 'file-namespace-heading' --> 'Summary'-- 'other-namespaces-heading' --> 'Documentation'-- 'testcases-create-link-display' --> 'create'--]=]localsubjectSpace=env.subjectSpaceifnotsubjectSpacethen-- Default to an "other namespaces" namespace, so that we get at least some output-- if an error occurs.subjectSpace=2endlocaldata={}-- Headinglocalheading=args.heading-- Blank values are not removed.ifheading==''then-- Don't display the start box if the heading arg is defined but blank.returnnilendifheadingthendata.heading=headingelseifsubjectSpace==10then-- Template namespacedata.heading=message('documentation-icon-wikitext')..' '..message('template-namespace-heading')elseifsubjectSpace==828then-- Module namespacedata.heading=message('documentation-icon-wikitext')..' '..message('module-namespace-heading')elseifsubjectSpace==6then-- File namespacedata.heading=message('file-namespace-heading')elsedata.heading=message('other-namespaces-heading')end-- Heading CSSlocalheadingStyle=args['heading-style']ifheadingStylethendata.headingStyleText=headingStyleelse-- 'documentation-heading'data.headingClass=message('main-div-heading-class')end-- Data for the [view][edit][history][purge] or [create] links.iflinksthen-- 'mw-editsection-like plainlinks'data.linksClass=message('start-box-link-classes')data.links=linksendreturndataendfunctionp.renderStartBox(data)-- Renders the start box html.-- @data - a table of data generated by p.makeStartBoxData.localsbox=mw.html.create('div')sbox-- 'documentation-startbox':addClass(message('start-box-class')):newline():tag('span'):addClass(data.headingClass):attr('id','documentation-heading'):cssText(data.headingStyleText):wikitext(data.heading)locallinks=data.linksiflinksthensbox:tag('span'):addClass(data.linksClass):attr('id',data.linksId):wikitext(links)endreturntostring(sbox)end------------------------------------------------------------------------------ Documentation content----------------------------------------------------------------------------p.content=makeInvokeFunc('_content')functionp._content(args,env)-- Displays the documentation contents-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironmentenv=envorp.getEnvironment(args)localdocTitle=env.docTitlelocalcontent=args.contentifnotcontentanddocTitleanddocTitle.existsthencontent=args._contentormw.getCurrentFrame():expandTemplate{title=docTitle.prefixedText}end-- The line breaks below are necessary so that "=== Headings ===" at the start and end-- of docs are interpreted correctly.return'\n'..(contentor'')..'\n'endp.contentTitle=makeInvokeFunc('_contentTitle')functionp._contentTitle(args,env)env=envorp.getEnvironment(args)localdocTitle=env.docTitleifnotargs.contentanddocTitleanddocTitle.existsthenreturndocTitle.prefixedTextelsereturn''endend------------------------------------------------------------------------------ End box----------------------------------------------------------------------------p.endBox=makeInvokeFunc('_endBox')functionp._endBox(args,env)--[=[-- This function generates the end box (also known as the link box).-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironment----]=]-- Get environment data.env=envorp.getEnvironment(args)localsubjectSpace=env.subjectSpacelocaldocTitle=env.docTitleifnotsubjectSpaceornotdocTitlethenreturnnilend-- Check whether we should output the end box at all. Add the end-- box by default if the documentation exists or if we are in the-- user, module or template namespaces.locallinkBox=args['link box']iflinkBox=='off'ornot(docTitle.existsorsubjectSpace==2orsubjectSpace==828orsubjectSpace==10)thenreturnnilend-- Assemble the link box.localtext=''iflinkBoxthentext=text..linkBoxelsetext=text..(p.makeDocPageBlurb(args,env)or'')-- "This documentation is transcluded from [[Foo]]."ifsubjectSpace==2orsubjectSpace==10orsubjectSpace==828then-- We are in the user, template or module namespaces.-- Add sandbox and testcases links.-- "Editors can experiment in this template's sandbox and testcases pages."text=text..(p.makeExperimentBlurb(args,env)or'')..'<br />'ifnotargs.contentandnotargs[1]then-- "Please add categories to the /doc subpage."-- Don't show this message with inline docs or with an explicitly specified doc page,-- as then it is unclear where to add the categories.text=text..(p.makeCategoriesBlurb(args,env)or'')endtext=text..' '..(p.makeSubpagesBlurb(args,env)or'')--"Subpages of this template"endendlocalbox=mw.html.create('div')-- 'documentation-metadata'box:attr('role','note'):addClass(message('end-box-class'))-- 'plainlinks':addClass(message('end-box-plainlinks')):wikitext(text):done()return'\n'..tostring(box)endfunctionp.makeDocPageBlurb(args,env)--[=[-- Makes the blurb "This documentation is transcluded from [[Predefinição:Foo]] (edit, history)".-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironment---- Messages:-- 'edit-link-display' --> 'edit'-- 'history-link-display' --> 'history'-- 'transcluded-from-blurb' -->-- 'The above [[Wikipedia:Template documentation|documentation]]-- is [[Help:Transclusion|transcluded]] from $1.'-- 'module-preload' --> 'Predefinição:Documentation/preload-module-doc'-- 'create-link-display' --> 'create'-- 'create-module-doc-blurb' -->-- 'You might want to $1 a documentation page for this [[Wikipedia:Lua|Scribunto module]].'--]=]localdocTitle=env.docTitleifnotdocTitlethenreturnnilendlocalretifdocTitle.existsthen-- /doc exists; link to it.localdocLink=makeWikilink(docTitle.prefixedText)localeditUrl=docTitle:fullUrl{action='edit'}localeditDisplay=message('edit-link-display')localeditLink=makeUrlLink(editUrl,editDisplay)localhistoryUrl=docTitle:fullUrl{action='history'}localhistoryDisplay=message('history-link-display')localhistoryLink=makeUrlLink(historyUrl,historyDisplay)ret=message('transcluded-from-blurb',{docLink})..' '..makeToolbar(editLink,historyLink)..'<br />'elseifenv.subjectSpace==828then-- /doc does not exist; ask to create it.localcreateUrl=docTitle:fullUrl{action='edit',preload=message('module-preload')}localcreateDisplay=message('create-link-display')localcreateLink=makeUrlLink(createUrl,createDisplay)ret=message('create-module-doc-blurb',{createLink})..'<br />'endreturnretendfunctionp.makeExperimentBlurb(args,env)--[[-- Renders the text "Editors can experiment in this template's sandbox (edit | diff) and testcases (edit) pages."-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironment---- Messages:-- 'sandbox-link-display' --> 'sandbox'-- 'sandbox-edit-link-display' --> 'edit'-- 'compare-link-display' --> 'diff'-- 'module-sandbox-preload' --> 'Predefinição:Documentation/preload-module-sandbox'-- 'template-sandbox-preload' --> 'Predefinição:Documentation/preload-sandbox'-- 'sandbox-create-link-display' --> 'create'-- 'mirror-edit-summary' --> 'Create sandbox version of $1'-- 'mirror-link-display' --> 'mirror'-- 'mirror-link-preload' --> 'Predefinição:Documentation/mirror'-- 'sandbox-link-display' --> 'sandbox'-- 'testcases-link-display' --> 'testcases'-- 'testcases-edit-link-display'--> 'edit'-- 'template-sandbox-preload' --> 'Predefinição:Documentation/preload-sandbox'-- 'testcases-create-link-display' --> 'create'-- 'testcases-link-display' --> 'testcases'-- 'testcases-edit-link-display' --> 'edit'-- 'module-testcases-preload' --> 'Predefinição:Documentation/preload-module-testcases'-- 'template-testcases-preload' --> 'Predefinição:Documentation/preload-testcases'-- 'experiment-blurb-module' --> 'Editors can experiment in this module's $1 and $2 pages.'-- 'experiment-blurb-template' --> 'Editors can experiment in this template's $1 and $2 pages.'--]]localsubjectSpace=env.subjectSpacelocaltemplateTitle=env.templateTitlelocalsandboxTitle=env.sandboxTitlelocaltestcasesTitle=env.testcasesTitlelocaltemplatePage=templateTitle.prefixedTextifnotsubjectSpaceornottemplateTitleornotsandboxTitleornottestcasesTitlethenreturnnilend-- Make links.localsandboxLinks,testcasesLinksifsandboxTitle.existsthenlocalsandboxPage=sandboxTitle.prefixedTextlocalsandboxDisplay=message('sandbox-link-display')localsandboxLink=makeWikilink(sandboxPage,sandboxDisplay)localsandboxEditUrl=sandboxTitle:fullUrl{action='edit'}localsandboxEditDisplay=message('sandbox-edit-link-display')localsandboxEditLink=makeUrlLink(sandboxEditUrl,sandboxEditDisplay)localcompareUrl=env.compareUrllocalcompareLinkifcompareUrlthenlocalcompareDisplay=message('compare-link-display')compareLink=makeUrlLink(compareUrl,compareDisplay)endsandboxLinks=sandboxLink..' '..makeToolbar(sandboxEditLink,compareLink)elselocalsandboxPreloadifsubjectSpace==828thensandboxPreload=message('module-sandbox-preload')elsesandboxPreload=message('template-sandbox-preload')endlocalsandboxCreateUrl=sandboxTitle:fullUrl{action='edit',preload=sandboxPreload}localsandboxCreateDisplay=message('sandbox-create-link-display')localsandboxCreateLink=makeUrlLink(sandboxCreateUrl,sandboxCreateDisplay)localmirrorSummary=message('mirror-edit-summary',{makeWikilink(templatePage)})localmirrorPreload=message('mirror-link-preload')localmirrorUrl=sandboxTitle:fullUrl{action='edit',preload=mirrorPreload,summary=mirrorSummary}ifsubjectSpace==828thenmirrorUrl=sandboxTitle:fullUrl{action='edit',preload=templateTitle.prefixedText,summary=mirrorSummary}endlocalmirrorDisplay=message('mirror-link-display')localmirrorLink=makeUrlLink(mirrorUrl,mirrorDisplay)sandboxLinks=message('sandbox-link-display')..' '..makeToolbar(sandboxCreateLink,mirrorLink)endiftestcasesTitle.existsthenlocaltestcasesPage=testcasesTitle.prefixedTextlocaltestcasesDisplay=message('testcases-link-display')localtestcasesLink=makeWikilink(testcasesPage,testcasesDisplay)localtestcasesEditUrl=testcasesTitle:fullUrl{action='edit'}localtestcasesEditDisplay=message('testcases-edit-link-display')localtestcasesEditLink=makeUrlLink(testcasesEditUrl,testcasesEditDisplay)-- for Modules, add testcases run link if existsiftestcasesTitle.contentModel=="Scribunto"andtestcasesTitle.talkPageTitleandtestcasesTitle.talkPageTitle.existsthenlocaltestcasesRunLinkDisplay=message('testcases-run-link-display')localtestcasesRunLink=makeWikilink(testcasesTitle.talkPageTitle.prefixedText,testcasesRunLinkDisplay)testcasesLinks=testcasesLink..' '..makeToolbar(testcasesEditLink,testcasesRunLink)elsetestcasesLinks=testcasesLink..' '..makeToolbar(testcasesEditLink)endelselocaltestcasesPreloadifsubjectSpace==828thentestcasesPreload=message('module-testcases-preload')elsetestcasesPreload=message('template-testcases-preload')endlocaltestcasesCreateUrl=testcasesTitle:fullUrl{action='edit',preload=testcasesPreload}localtestcasesCreateDisplay=message('testcases-create-link-display')localtestcasesCreateLink=makeUrlLink(testcasesCreateUrl,testcasesCreateDisplay)testcasesLinks=message('testcases-link-display')..' '..makeToolbar(testcasesCreateLink)endlocalmessageNameifsubjectSpace==828thenmessageName='experiment-blurb-module'elsemessageName='experiment-blurb-template'endreturnmessage(messageName,{sandboxLinks,testcasesLinks})endfunctionp.makeCategoriesBlurb(args,env)--[[-- Generates the text "Please add categories to the /doc subpage."-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironment-- Messages:-- 'doc-link-display' --> '/doc'-- 'add-categories-blurb' --> 'Please add categories to the $1 subpage.'--]]localdocTitle=env.docTitleifnotdocTitlethenreturnnilendlocaldocPathLink=makeWikilink(docTitle.prefixedText,message('doc-link-display'))returnmessage('add-categories-blurb',{docPathLink})endfunctionp.makeSubpagesBlurb(args,env)--[[-- Generates the "Subpages of this template" link.-- @args - a table of arguments passed by the user-- @env - environment table containing title objects, etc., generated with p.getEnvironment-- Messages:-- 'template-pagetype' --> 'template'-- 'module-pagetype' --> 'module'-- 'default-pagetype' --> 'page'-- 'subpages-link-display' --> 'Subpages of this $1'--]]localsubjectSpace=env.subjectSpacelocaltemplateTitle=env.templateTitleifnotsubjectSpaceornottemplateTitlethenreturnnilendlocalpagetypeifsubjectSpace==10thenpagetype=message('template-pagetype')elseifsubjectSpace==828thenpagetype=message('module-pagetype')elsepagetype=message('default-pagetype')endlocalsubpagesLink=makeWikilink('Special:PrefixIndex/'..templateTitle.prefixedText..'/',message('subpages-link-display',{pagetype}))returnmessage('subpages-blurb',{subpagesLink})end------------------------------------------------------------------------------ Tracking categories----------------------------------------------------------------------------functionp.addTrackingCategories(env)--[[-- Check if {{documentation}} is transcluded on a /doc or /testcases page.-- @env - environment table containing title objects, etc., generated with p.getEnvironment-- Messages:-- 'display-strange-usage-category' --> true-- 'doc-subpage' --> 'doc'-- 'testcases-subpage' --> 'testcases'-- 'strange-usage-category' --> 'Wikipedia pages with strange ((documentation)) usage'---- /testcases pages in the module namespace are not categorised, as they may have-- {{documentation}} transcluded automatically.--]]localtitle=env.titlelocalsubjectSpace=env.subjectSpaceifnottitleornotsubjectSpacethenreturnnilendlocalsubpage=title.subpageTextlocalret=''ifmessage('display-strange-usage-category',nil,'boolean')and(subpage==message('doc-subpage')orsubjectSpace~=828andsubpage==message('testcases-subpage'))thenret=ret..makeCategoryLink(message('strange-usage-category'))endreturnretendreturnp
