Module:Hatnote and Module:Hatnote/sandbox: Difference between pages

(Difference between pages)
Jump to navigation Jump to search
Page 1
Page 2
imported>Nihiltres
imported>Ahecht
Revert
 
imported>Nihiltres
Export default classes
 
Line 19: Line 19:
-- Helper functions
-- Helper functions
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
local curNs = mw.title.getCurrentTitle().namespace
p.missingTargetCat =
--Default missing target category, exported for use in related modules
((curNs ==  0) or (curNs == 14)) and
'Articles with hatnote templates targeting a nonexistent page' or nil


local function getArgs(frame)
local function getArgs(frame)
Line 30: Line 36:
-- Removes the initial colon from a string, if present.
-- Removes the initial colon from a string, if present.
return s:match('^:?(.*)')
return s:match('^:?(.*)')
end
function p.defaultClasses(inline)
-- Provides the default hatnote classes as a space-separated string; useful
-- for hatnote-manipulation modules like [[Module:Hatnote group]].
return
(inline == 1 and 'hatnote-inline' or 'hatnote') .. ' ' ..
'navigation-not-searchable'
end
function p.disambiguate(page, disambiguator)
-- Formats a page title with a disambiguation parenthetical,
-- i.e. "Example" → "Example (disambiguation)".
checkType('disambiguate', 1, page, 'string')
checkType('disambiguate', 2, disambiguator, 'string', true)
disambiguator = disambiguator or 'disambiguation'
return mw.ustring.format('%s (%s)', page, disambiguator)
end
end


Line 108: Line 97:
end
end


local curNs = mw.title.getCurrentTitle().namespace
function p.disambiguate(page, disambiguator)
p.missingTargetCat =
-- Formats a page title with a disambiguation parenthetical,
--Default missing target category, exported for use in related modules
-- i.e. "Example" → "Example (disambiguation)".
((curNs ==  0) or (curNs == 14)) and
checkType('disambiguate', 1, page, 'string')
'Articles with hatnote templates targeting a nonexistent page' or nil
checkType('disambiguate', 2, disambiguator, 'string', true)
disambiguator = disambiguator or 'disambiguation'
return mw.ustring.format('%s (%s)', page, disambiguator)
end


function p.quote(title)
function p.defaultClasses(inline)
--Wraps titles in quotation marks. If the title starts/ends with a quotation
-- Provides the default hatnote classes as a space-separated string; useful
--mark, kerns that side as with {{-'}}
-- for hatnote-manipulation modules like [[Module:Hatnote group]].
local quotationMarks = {
return
["'"]=true, ['"']=true, ['“']=true, ["‘"]=true, ['”']=true, ["’"]=true
(inline == 1 and 'hatnote-inline' or 'hatnote') .. ' ' ..
}
'navigation-not-searchable'
local quoteLeft, quoteRight = -- Test if start/end are quotation marks
quotationMarks[string.sub(title,  1,  1)],
quotationMarks[string.sub(title, -1, -1)]
if quoteLeft or quoteRight then
title = mw.html.create("span"):wikitext(title)
end
if quoteLeft  then title:css("padding-left",  "0.15em") end
if quoteRight then title:css("padding-right", "0.15em") end
return '"' .. tostring(title) .. '"'
end
end


Line 136: Line 119:
-- Produces standard hatnote text. Implements the {{hatnote}} template.
-- Produces standard hatnote text. Implements the {{hatnote}} template.
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
p[''] = function (frame) return p.hatnote(frame:newChild{ title = "Template:Hatnote" }) end


function p.hatnote(frame)
function p.hatnote(frame)
Retrieved from "http://70.231.62.181/index.php/Special:ComparePages"