Módulo:HtmlBuilder - Historial de revisiones

Idiazayuso: 7 revisiones importadas

2025-04-01T10:05:55Z

7 revisiones importadas

← Revisión anterior	Revisión del 12:05 1 abr 2025
(Sin diferencias)

Idiazayuso: 1 revisión importada

2024-08-06T17:40:46Z

1 revisión importada

← Revisión anterior	Revisión del 19:40 6 ago 2024
(Sin diferencias)

Plantilla:Ficha_de_órgano_legislativo>LuchoCR: Cambió la configuración de protección de «Módulo:HtmlBuilder»: Módulo o plantilla muy utilizado/sensible ([Editar=Permitir solo editores de plantillas y administradores] (indefinido))

2023-02-28T18:53:27Z

Cambió la configuración de protección de «Módulo:HtmlBuilder»: Módulo o plantilla muy utilizado/sensible ([Editar=Permitir solo editores de plantillas y administradores] (indefinido))

← Revisión anterior	Revisión del 20:53 28 feb 2023
(Sin diferencias)

wikipedia>Abián: Protegió «Módulo:HtmlBuilder»: Página más transcluida del proyecto, alto riesgo ([Editar=Solo bibliotecarios] (indefinido) [Pueden trasladar=Solo bibliotecarios] (indefinido))

2015-02-24T21:43:20Z

Protegió «Módulo:HtmlBuilder»: Página más transcluida del proyecto, alto riesgo ([Editar=Solo bibliotecarios] (indefinido) [Pueden trasladar=Solo bibliotecarios] (indefinido))

← Revisión anterior	Revisión del 23:43 24 feb 2015
(Sin diferencias)

wikipedia>Miguillen en 12:49 13 dic 2014

2014-12-13T12:49:42Z

← Revisión anterior		Revisión del 14:49 13 dic 2014
Línea 2:		Línea 2:

	local HtmlBuilder = {}		local HtmlBuilder = {}

	local metatable = {}		local metatable = {}

	metatable.__index = function(t, key)		metatable.__index = function(t, key)
	local ret = rawget(t, key)		local ret = rawget(t, key)
Línea 10:		Línea 10:
	return ret		return ret
	end		end

	ret = metatable[key]		ret = metatable[key]
	if type(ret) == 'function' then		if type(ret) == 'function' then
Línea 20:		Línea 20:
	end		end
	end		end

	metatable.__tostring = function(t)		metatable.__tostring = function(t)
	local ret = {}		local ret = {}
	t._build(ret)		t._build(ret)
	return table.concat(ret~~, ''~~)		return table.concat(ret)
	end		end

	metatable._build = function(t, ret)		metatable._build = function(t, ret)
	if t.tagName then		if t.tagName then
Línea 62:		Línea 62:
	end		end
	end		end

	metatable.node = function(t, builder)		metatable.node = function(t, builder)
	if builder then		if builder then
Línea 69:		Línea 69:
	return t		return t
	end		end

	metatable.wikitext = function(t, ...)		metatable.wikitext = function(t, ...)
	local vals = {...}		local vals = {...}
Línea 79:		Línea 79:
	return t		return t
	end		end

	metatable.newline = function(t)		metatable.newline = function(t)
	table.insert(t.nodes, '\n')		table.insert(t.nodes, '\n')
	return t		return t
	end		end

	metatable.tag = function(t, tagName, args)		metatable.tag = function(t, tagName, args)
	args = args or {}		args = args or {}
Línea 92:		Línea 92:
	return builder		return builder
	end		end

	function getAttr(t, name)		local function getAttr(t, name)
	for i, attr in ipairs(t.attributes) do		for i, attr in ipairs(t.attributes) do
	if attr.name == name then		if attr.name == name then
Línea 100:		Línea 100:
	end		end
	end		end

	metatable.attr = function(t, name, val)		metatable.attr = function(t, name, val)
	-- if caller sets the style attribute explicitly, then replace all styles previously added with css() and cssText()		if type(val) == 'string' or type(val) == 'number' then
	if name == 'style' then		-- if caller sets the style attribute explicitly, then replace all styles previously added with css() and cssText()
	t.styles = {val}		if name == 'style' then
	return t		t.styles = {val}
	end		return t
			end
	local attr = getAttr(t, name)
	if attr then		local attr = getAttr(t, name)
	attr.val = val		if attr then
	else		attr.val = val
	table.insert(t.attributes, {name = name, val = val})		else
			table.insert(t.attributes, {name = name, val = val})
			end
	end		end

	return t		return t
	end		end

	metatable.addClass = function(t, class)		metatable.addClass = function(t, class)
	if class then		if class then
Línea 127:		Línea 129:
	end		end
	end		end

	return t		return t
	end		end

	metatable.css = function(t, name, val)		metatable.css = function(t, name, val)
	if type(val) == 'string' or type(val) == 'number' then		if type(val) == 'string' or type(val) == 'number' then
Línea 139:		Línea 141:
	end		end
	end		end

	table.insert(t.styles, {name = name, val = val})		table.insert(t.styles, {name = name, val = val})
	end		end

	return t		return t
	end		end

	metatable.cssText = function(t, css)		metatable.cssText = function(t, css)
	if css then		if css then
Línea 152:		Línea 154:
	return t		return t
	end		end

	metatable.done = function(t)		metatable.done = function(t)
	return t.parent or t		return t.parent or t
	end		end

	metatable.allDone = function(t)		metatable.allDone = function(t)
	while t.parent do		while t.parent do
Línea 163:		Línea 165:
	return t		return t
	end		end

	function HtmlBuilder.create(tagName, args)		function HtmlBuilder.create(tagName, args)
	args = args or {}		args = args or {}
Línea 177:		Línea 179:
	return builder		return builder
	end		end

	return HtmlBuilder		return HtmlBuilder

wikipedia>Miguillen en 10:48 10 jun 2013

2013-06-10T10:48:07Z

← Revisión anterior		Revisión del 12:48 10 jun 2013
Línea 43:		Línea 43:
	end		end
	table.insert(ret, '"')		table.insert(ret, '"')
			end
			if t.selfClosing then
			table.insert(ret, ' /')
	end		end
	table.insert(ret, '>')		table.insert(ret, '>')
Línea 55:		Línea 58:
	end		end
	end		end
	if t.tagName and not t.unclosed then		if t.tagName and not t.unclosed and not t.selfClosing then
	table.insert(ret, '</' .. t.tagName .. '>')		table.insert(ret, '</' .. t.tagName .. '>')
	end		end
Línea 99:		Línea 102:

	metatable.attr = function(t, name, val)		metatable.attr = function(t, name, val)
	-- ~~Si una persona establece el atributo de estilo de forma explícita~~, ~~a continuación, reemplace todos los estilos añadidos previamente con~~ css () y cssText ()		-- if caller sets the style attribute explicitly, then replace all styles previously added with css() and cssText()
	if name == 'style' then		if name == 'style' then
	t.styles = {val}		t.styles = {val}
Línea 171:		Línea 174:
	builder.parent = args.parent		builder.parent = args.parent
	builder.unclosed = args.unclosed or false		builder.unclosed = args.unclosed or false
			builder.selfClosing = args.selfClosing or false
	return builder		return builder
	end		end

	return HtmlBuilder		return HtmlBuilder

wikipedia>Miguillen: Miguillen movió la página Module:Module:HtmlBuilder a Module:HtmlBuilder sin dejar una redirección

2013-04-01T16:52:50Z

Miguillen movió la página Module:Module:HtmlBuilder a Module:HtmlBuilder sin dejar una redirección

← Revisión anterior	Revisión del 18:52 1 abr 2013
(Sin diferencias)

wikipedia>Miguillen: Miguillen movió la página Module:ConstructorHTML a Module:Module:HtmlBuilder sin dejar una redirección: nombre más práctico

2013-04-01T15:56:31Z

Miguillen movió la página Module:ConstructorHTML a Module:Module:HtmlBuilder sin dejar una redirección: nombre más práctico

← Revisión anterior	Revisión del 17:56 1 abr 2013
(Sin diferencias)

wikipedia>Miguillen en 23:24 31 mar 2013

2013-03-31T23:24:55Z

← Revisión anterior		Revisión del 01:24 1 abr 2013
Línea 1:		Línea 1:
	-- Experimental ~~module for building complex~~ HTML (~~e.g. infoboxes~~, ~~navboxes~~) ~~using a fluent interface~~		-- Módulo Experimental para la construcción de complementos HTML (por ejemplo, fichas plantillas de navegación) con una interfaz fluida

	local HtmlBuilder = {}		local HtmlBuilder = {}
Línea 99:		Línea 99:

	metatable.attr = function(t, name, val)		metatable.attr = function(t, name, val)
	-- ~~if caller sets the style attribute explicitly~~, ~~then replace all styles previously added with~~ css() ~~and~~ cssText()		-- Si una persona establece el atributo de estilo de forma explícita, a continuación, reemplace todos los estilos añadidos previamente con css () y cssText ()
	if name == 'style' then		if name == 'style' then
	t.styles = {val}		t.styles = {val}

wikipedia>Miguillen: Página creada con «-- Experimental module for building complex HTML (e.g. infoboxes, navboxes) using a fluent interface local HtmlBuilder = {} local metatable = {} metatable.__index = f...»

2013-03-31T18:44:42Z

Página creada con «-- Experimental module for building complex HTML (e.g. infoboxes, navboxes) using a fluent interface local HtmlBuilder = {} local metatable = {} metatable.__index = f...»

Página nueva

-- Experimental module for building complex HTML (e.g. infoboxes, navboxes) using a fluent interface

local HtmlBuilder = {}

local metatable = {}

metatable.__index = function(t, key)
local ret = rawget(t, key)
if ret then
return ret
end

ret = metatable[key]
if type(ret) == 'function' then
return function(...)
return ret(t, ...)
end
else
return ret
end
end

metatable.__tostring = function(t)
local ret = {}
t._build(ret)
return table.concat(ret, '')
end

metatable._build = function(t, ret)
if t.tagName then
table.insert(ret, '<' .. t.tagName)
for i, attr in ipairs(t.attributes) do
table.insert(ret, ' ' .. attr.name .. '="' .. attr.val .. '"')
end
if #t.styles > 0 then
table.insert(ret, ' style="')
for i, prop in ipairs(t.styles) do
if type(prop) == 'string' then -- added with cssText()
table.insert(ret, prop .. ';')
else -- added with css()
table.insert(ret, prop.name .. ':' .. prop.val .. ';')
end
end
table.insert(ret, '"')
end
table.insert(ret, '>')
end
for i, node in ipairs(t.nodes) do
if node then
if type(node) == 'table' then
node._build(ret)
else
table.insert(ret, tostring(node))
end
end
end
if t.tagName and not t.unclosed then
table.insert(ret, '</' .. t.tagName .. '>')
end
end

metatable.node = function(t, builder)
if builder then
table.insert(t.nodes, builder)
end
return t
end

metatable.wikitext = function(t, ...)
local vals = {...}
for i = 1, #vals do
if vals[i] then
table.insert(t.nodes, vals[i])
end
end
return t
end

metatable.newline = function(t)
table.insert(t.nodes, '\n')
return t
end

metatable.tag = function(t, tagName, args)
args = args or {}
args.parent = t
local builder = HtmlBuilder.create(tagName, args)
table.insert(t.nodes, builder)
return builder
end

function getAttr(t, name)
for i, attr in ipairs(t.attributes) do
if attr.name == name then
return attr
end
end
end

metatable.attr = function(t, name, val)
-- if caller sets the style attribute explicitly, then replace all styles previously added with css() and cssText()
if name == 'style' then
t.styles = {val}
return t
end

local attr = getAttr(t, name)
if attr then
attr.val = val
else
table.insert(t.attributes, {name = name, val = val})
end

return t
end

metatable.addClass = function(t, class)
if class then
local attr = getAttr(t, 'class')
if attr then
attr.val = attr.val .. ' ' .. class
else
t.attr('class', class)
end
end

return t
end

metatable.css = function(t, name, val)
if type(val) == 'string' or type(val) == 'number' then
for i, prop in ipairs(t.styles) do
if prop.name == name then
prop.val = val
return t
end
end

table.insert(t.styles, {name = name, val = val})
end

return t
end

metatable.cssText = function(t, css)
if css then
table.insert(t.styles, css)
end
return t
end

metatable.done = function(t)
return t.parent or t
end

metatable.allDone = function(t)
while t.parent do
t = t.parent
end
return t
end

function HtmlBuilder.create(tagName, args)
args = args or {}
local builder = {}
setmetatable(builder, metatable)
builder.nodes = {}
builder.attributes = {}
builder.styles = {}
builder.tagName = tagName
builder.parent = args.parent
builder.unclosed = args.unclosed or false
return builder
end

return HtmlBuilder