Modul:Redirect-multi

localmRedirectHatnote=require('Module:Redirect hatnote')
localmArguments=require('Module:Arguments')
localmHatnote=require('Module:Hatnote')
localp={}
functionp.redirectMulti(frame)
localargs=mArguments.getArgs(frame)
--Get maxArg manually because getArgs and table.maxn aren't friends
localmaxArg=0
fork,vinpairs(args)do
iftype(k)=='number'andk>maxArgthenmaxArg=kend
end
--Get number of redirects then remove it from the args table
localnumRedirects=tonumber(args[1])or1
--Manual downshift of arguments; not using table.remove because getArgs is
--gnarly and it's not a sequence anyway
fori=2,maxArg+1doargs[i-1]=args[i]end
--if no arguments past redirects exist, add in a default set
ifmaxArg-2<=numRedirectsthen
fori=1,numRedirectsdo
args[numRedirects+(2*i)]=args[i]andmHatnote.disambiguate(args[i])
--this does add in an "and" after the last item, but it's ignored
args[numRedirects+(2*i)+1]='and'
end
end
localoptions={selfref=args.selfref}
returnmRedirectHatnote._redirect(args,numRedirects,options)
end
returnp