Module:Infobox monument - Historique des versions

Admin le 8 octobre 2026 à 19:17

2026-10-08T19:17:57Z

← Version précédente		Version du 8 octobre 2026 à 20:17
Ligne 66 :		Ligne 66 :
	{ 'Inscrit', args.mhinscrit },		{ 'Inscrit', args.mhinscrit },
	{ 'Patrimonialité', args.patrimonialite },		{ 'Patrimonialité', args.patrimonialite },
	{ 'Objet de la protection', args.mhobjet },		{ 'Objet(s) de la protection', args.mhobjet },
	})		})

Admin le 8 octobre 2026 à 19:07

2026-10-08T19:07:11Z

← Version précédente		Version du 8 octobre 2026 à 20:07
Ligne 65 :		Ligne 65 :
	{ 'Classé', args.mhclasse },		{ 'Classé', args.mhclasse },
	{ 'Inscrit', args.mhinscrit },		{ 'Inscrit', args.mhinscrit },
			{ 'Patrimonialité', args.patrimonialite },
	{ 'Objet de la protection', args.mhobjet },		{ 'Objet de la protection', args.mhobjet },
	})		})

Admin le 8 octobre 2026 à 14:43

2026-10-08T14:43:30Z

← Version précédente		Version du 8 octobre 2026 à 15:43
Ligne 3 :		Ligne 3 :
	local p = {}		local p = {}

	~~-- Renvoie la valeur nettoyée, ou nil si absente/vide~~
	local function clean(v)		local function clean(v)
	if v == nil then return nil end		if v == nil then return nil end
Ligne 11 :		Ligne 10 :
	end		end

	~~-- Ajoute une ligne seulement si la valeur existe ; renvoie toujours l'infobox~~
	local function addRow(box, label, value)		local function addRow(box, label, value)
	value = clean(value)		value = clean(value)
	if value then		if value then
	box:addRow(label, value)		box:addRow(label, value)
			end
			return box
			end

			local function addSection(box, title, rows)
			local hasContent = false
			for _, r in ipairs(rows) do
			if clean(r[2]) then
			hasContent = true
			break
			end
			end
			if not hasContent then
			return box
			end

			box:addHeader(title)
			for _, r in ipairs(rows) do
			addRow(box, r[1], r[2])
	end		end
	return box		return box
Ligne 41 :		Ligne 58 :
	addRow(box, 'Propriété', args.propriete)		addRow(box, 'Propriété', args.propriete)

	box~~:addHeader(~~'Localisation')		addSection(box, 'Localisation', {
	~~addRow(box,~~ 'Commune', args.commune)		{ 'Commune', args.commune },
			})

	box~~:addHeader(~~'Protection au titre des Monuments Historiques')		addSection(box, 'Protection au titre des Monuments Historiques', {
	~~addRow(box,~~ 'Classé', args.mhclasse)		{ 'Classé', args.mhclasse },
	~~addRow(box,~~ 'Inscrit', args.mhinscrit)		{ 'Inscrit', args.mhinscrit },
	~~addRow(box,~~ 'Objet de la protection', args.mhobjet)		{ 'Objet de la protection', args.mhobjet },
			})

	return box		return box

Admin le 8 octobre 2026 à 14:27

2026-10-08T14:27:43Z

@@ Ligne 2 : / Ligne 2 : @@
 local p = {}
 function p.main(frame)
 	local args = frame:getParent().args
 	local headerStyle
-	if args.headerstyle and args.headerstyle ~= '' then
+	local headerStyle = 'background-color:' .. (clean(args.headerstyle) or '#8a6b23') .. ';'
-		headerStyle = string.format('background-color:%s;', args.headerstyle)
+	local titleStyle  = 'background-color:' .. (clean(args.titlestyle) or '#8a6b23') .. ';'
-	else
-		headerStyle = 'background-color:#8a6b23;'
+	local box = capiunto.create{
 	end
-	return retval
+	addRow(box, 'Construction', args.construction)
 end
 return p

Admin le 8 octobre 2026 à 12:58

2026-10-08T12:58:48Z

← Version précédente		Version du 8 octobre 2026 à 13:58
Ligne 27 :		Ligne 27 :
	:addRow( 'Visite possible', args.visitable)		:addRow( 'Visite possible', args.visitable)
	:addRow( 'Propriété', args.propriete)		:addRow( 'Propriété', args.propriete)
			:addHeader( 'Localisation' )
			:addRow( 'Commune', args.commune )
	:addHeader( 'Protection au titre des Monuments Historiques' )		:addHeader( 'Protection au titre des Monuments Historiques' )
	:addRow( 'Classé', args.mhclasse)		:addRow( 'Classé', args.mhclasse)

Admin le 8 octobre 2026 à 12:36

2026-10-08T12:36:03Z

← Version précédente		Version du 8 octobre 2026 à 13:36
Ligne 24 :		Ligne 24 :
	:addImage( args.image, args.caption )		:addImage( args.image, args.caption )
	:addRow( 'Construction', args.construction)		:addRow( 'Construction', args.construction)
			:addRow( 'Destination initiale', args.destination)
	:addRow( 'Visite possible', args.visitable)		:addRow( 'Visite possible', args.visitable)
	:addRow( 'Propriété', args.propriete)		:addRow( 'Propriété', args.propriete)

Admin le 20 août 2025 à 07:00

2025-08-20T07:00:53Z

← Version précédente		Version du 20 août 2025 à 08:00
Ligne 29 :		Ligne 29 :
	:addRow( 'Classé', args.mhclasse)		:addRow( 'Classé', args.mhclasse)
	:addRow( 'Inscrit', args.mhinscrit)		:addRow( 'Inscrit', args.mhinscrit)
	:addRow( 'Objet de protection', args.mhobjet)		:addRow( 'Objet de la protection', args.mhobjet)

	return retval		return retval

Admin le 20 août 2025 à 06:14

2025-08-20T06:14:56Z

← Version précédente		Version du 20 août 2025 à 07:14
Ligne 29 :		Ligne 29 :
	:addRow( 'Classé', args.mhclasse)		:addRow( 'Classé', args.mhclasse)
	:addRow( 'Inscrit', args.mhinscrit)		:addRow( 'Inscrit', args.mhinscrit)
	:addRow( 'Objet de la protection', args.mhobjet)		:addRow( 'Objet de protection', args.mhobjet)

	return retval		return retval

Admin le 13 août 2025 à 14:53

2025-08-13T14:53:33Z

← Version précédente		Version du 13 août 2025 à 15:53
Ligne 22 :		Ligne 22 :
	headerStyle = headerStyle,		headerStyle = headerStyle,
	} )		} )
	~~:addHeader( 'Général' )~~
	:addImage( args.image, args.caption )		:addImage( args.image, args.caption )
	:addRow( 'Construction', args.construction)		:addRow( 'Construction', args.construction)

Admin le 13 août 2025 à 14:50

2025-08-13T14:50:09Z

← Version précédente		Version du 13 août 2025 à 15:50
Ligne 10 :		Ligne 10 :
	else		else
	headerStyle = 'background-color:#8a6b23;'		headerStyle = 'background-color:#8a6b23;'
			end
			local titleStyle
			if args.titleStyle and args.titleStyle ~= '' then
			titleStyle = string.format('background-color:%s;', args.titleStyle)
			else
			titleStyle= 'background-color:#8a6b23;'
	end		end
	local retval = capiunto.create( {		local retval = capiunto.create( {
	title = args.title,		title = args.title,
			titleStyle = titleStyle,
	headerStyle = headerStyle,		headerStyle = headerStyle,
	} )		} )