Modul:Other uses

localmHatnote=require('Module:Hatnote')
localmHatlist=require('Module:Hatnote list')
localmArguments--initialize lazily
localmTableTools--initialize lazily
locallibraryUtil=require('libraryUtil')
localcheckType=libraryUtil.checkType
localp={}
-- Produces standard {{other uses}} implementation
functionp.otheruses(frame)
mArguments=require('Module:Arguments')
mTableTools=require('Module:TableTools')
localargs=mTableTools.compressSparseArray(mArguments.getArgs(frame))
localtitle=mw.title.getCurrentTitle().prefixedText
returnp._otheruses(args,{title=title})
end
--Implements "other [x]" templates with otherText supplied at invocation
functionp.otherX(frame)
mArguments=require('Module:Arguments')
mTableTools=require('Module:TableTools')
localx=frame.args[1]
localargs=mTableTools.compressSparseArray(
mArguments.getArgs(frame,{parentOnly=true})
)
localoptions={
title=mw.title.getCurrentTitle().prefixedText,
otherText=x
}
returnp._otheruses(args,options)
end
-- Main generator
functionp._otheruses(args,options)
--Type-checks and defaults
checkType('_otheruses',1,args,'table',true)
args=argsor{}
checkType('_otheruses',2,options,'table')
ifnot(options.defaultPageoroptions.title)then
error('Tidak ada judul data yang disediakan di tabel pilihan "_otheruses"',2)
end
localemptyArgs=true
fork,vinpairs(args)do
iftype(k)=='number'thenemptyArgs=falsebreakend
end
ifemptyArgsthen
args={
options.defaultPageor
mHatnote.disambiguate(options.title,options.disambiguator)
}
end
--Generate and return hatnote
localtext=mHatlist.forSeeTableToString({{
use=options.otherTextand"kegunaan lain "..options.otherTextornil,
pages=args
}})
returnmHatnote._hatnote(text)
end
returnp