Module:User

La documentation pour ce module peut être créée à Module:User/doc

--[[
-- Debug console
frame = mw.getCurrentFrame() -- Get a frame object
newFrame = frame:newChild{ -- Get one with args
	title = 'oeuvre_test' ,
 args = { 
 iri = 'https://gregorius.dsi.universite-paris-saclay.fr/wiki/Utilisateur:Francois_Jankowiak' ,
["Fullname"] = 'François Jankowiak',
["Email"] = 'francois.jankowiak@u-psud.fr'
    }
}
mw.log(p.infobox( newFrame ) )
]]

-- local p = {}

-- function p.infobox(f)
-- 	local capiunto = require 'capiunto'
--     local linkedwiki = require 'linkedwiki'
--     linkedwiki.setCurrentFrame(mw.getCurrentFrame()) -- added by hand
    
--     local rdfs = 'http://www.w3.org/2000/01/rdf-schema#'
--     local daapProp = 'http://daap.eu/wiki/Property:'
--     local geo = 'http://www.w3.org/2003/01/geo/wgs84_pos#'
--     local vcard = 'http://www.w3.org/2006/vcard/ns#'
   
--     linkedwiki.setSubject(linkedwiki.getCurrentIRI())
   
-- 	return capiunto.create( {
-- 	    -- bodyStyle = 'border: 15px solid red',
-- 		title =  linkedwiki.checkLink(linkedwiki.getCurrentIRI(), rdfs..'label',f.args.Title)  ,
--                 top = 'User',
-- 		topStyle = 'background:#cfc;font-size:larger',		
-- 		bottom = linkedwiki.checkExternLink('Website',rdfs..'seeAlso',f.args.Website)
-- 	} )
-- 	:addRow('Fullname', linkedwiki.checkValue(vcard..'fn',f.args.Fullname))
-- 	:addRow('Email', linkedwiki.checkValue(vcard..'email',f.args.Email))
-- 	:addWikitext( "[[Catégorie:Utilisateur]]" )
	
-- end
 
-- return p
local p = {}

function p.infobox(f)
	local capiunto = require 'capiunto'
    local linkedwiki = require 'linkedwiki'
    linkedwiki.setCurrentFrame(mw.getCurrentFrame())
    
	
   local rdfs = 'http://www.w3.org/2000/01/rdf-schema#'
   local geo = 'http://www.w3.org/2003/01/geo/wgs84_pos#'
   local vcard = 'http://www.w3.org/2006/vcard/ns#'
   
   local subject = f.args.iri or linkedwiki.getCurrentIRI();
   local object =  linkedwiki.new(subject)
	return capiunto.create( {
	    -- bodyStyle = 'border: 15px solid red',
		title =   object:checkLabelOfInternLink(subject, rdfs..'label',f.args.Title)  ,
                top = 'User',
		topStyle = 'background:#cfc;font-size:larger',		
		bottom =  object:checkExternLink('Website',rdfs..'seeAlso',f.args.Website)
	} )
	:addRow('Fullname',  object:checkValue(vcard..'fn',f.args.Fullname))
	:addRow('Email',  object:checkValue(vcard..'email',f.args.Email))
	--:addRow('Organization',  object:checkValue(vcard..'hasOrganizationUnit',f.args.Organization_1))
	--:addRow('Organization',  object:checkValue(vcard..'hasOrganizationUnit',f.args.Organization_2))
	--:addRow('Organization',  object:checkValue(vcard..'hasOrganizationUnit',f.args.Organization_3))
	:addWikitext(  object:getMaintenanceCategory() ..  "[[Category:User]]" )
	
end
 
return p