Geen bewerkingssamenvatting
Geen bewerkingssamenvatting
Regel 1: Regel 1:
local p = {}
local p = {}
local mSlot = require("Module:Slot")
local mSlot = require("Module:Slot")
local mTitle = require("Module:Class/Title")


--[[  
--[[  
Regel 28: Regel 29:
--[[ used by Class/Book, maybe todo : Class/Title ]]--
--[[ used by Class/Book, maybe todo : Class/Title ]]--
p.createSortLabelByAuthor = function( titelBiblio, firstAuthorBiblioName )
p.createSortLabelByAuthor = function( titelBiblio, firstAuthorBiblioName )
local titleBiblioFlattened = p.flattenBibliographicTitle( titelBiblio )
local titleBiblioFlattened = mTitle.flattenBibliographicTitle( titelBiblio )
return string.lower( firstAuthorBiblioName .. " - " .. titleBiblioFlattened )
return string.lower( firstAuthorBiblioName .. " - " .. titleBiblioFlattened )
end
end


return p
return p

Versie van 1 okt 2025 19:36

Module:Class/Person




local p = {}
local mSlot = require("Module:Slot")
local mTitle = require("Module:Class/Title")

--[[ 
Accepts a comma-separated list of pages representing persons
and returns up to two names (NaamGew = first name foll. by last name )
- delimiter = &
- if more than two authors are given, the string ends with  ", e.a."
]]--
p.getAuthorNames = function( authors )
	if authors == "" or authors == nil then return "" end
	local authorTbl = mw.text.split( authors, "," )
	--mw.log( "#authorTbl", #authorTbl )
	local nameTbl = {}
	for i,v in ipairs(authorTbl) do
		-- first two authors only
		if i == 1 or i == 2 then
			local naamGew = mSlot.getValueFromTemplateData( "ws-page-props", mw.text.trim(v), "Person", "NaamGew" )
			--mw.log( "naamGew: " .. naamGew )
			table.insert( nameTbl, naamGew )
		end
	end
	local str = table.concat( nameTbl, " & ")
	if #authorTbl > 2 then str = str .. ", e.a." end
	return str
end

--[[ used by Class/Book, maybe todo : Class/Title ]]--
p.createSortLabelByAuthor = function( titelBiblio, firstAuthorBiblioName )
	local titleBiblioFlattened = mTitle.flattenBibliographicTitle( titelBiblio )
	return string.lower( firstAuthorBiblioName .. " - " .. titleBiblioFlattened )
end

return p