پودمان:Side box: تفاوت میان نسخه‌ها

از ویکی حج
(صفحه‌ای تازه حاوی «-- This module implements {{side box}}. local yesno = require('Module:Yesno') local p = {} function p.main(frame) local origArgs = fram...» ایجاد کرد)
 
(add newline before end of table)
خط ۳۰: خط ۳۰:
table.insert(data.classes, 'metadata')
table.insert(data.classes, 'metadata')
end
end
if args.position and (args.position:lower() == 'right' or args.position == 'راست')  then
if args.position and args.position:lower() == 'left' then
table.insert(data.classes, 'mbox-small-right')
table.insert(data.classes, 'mbox-small-left')
else
else
table.insert(data.classes, 'mbox-small')
table.insert(data.classes, 'mbox-small')
خط ۵۴: خط ۵۴:
-- Body row
-- Body row
'text',
'text',
'imageleft',
'imageright',


-- Below row
-- Below row
خط ۷۱: خط ۷۱:
-- Table root
-- Table root
local root = mw.html.create('table')
local root = mw.html.create('table')
root:attr('role', 'presentation')
for i, class in ipairs(data.classes or {}) do
for i, class in ipairs(data.classes or {}) do
root:addClass(class)
root:addClass(class)
end
end
root:css{border = '1px solid #aaa', ['background-color'] = '#f9f9f9'}
root:css{border = '1px solid #aaa', ['background-color'] = '#f9f9f9', color = '#000'}
if data.style then
if data.style then
root:cssText(data.style)
root:cssText(data.style)
خط ۸۳: خط ۸۴:
local aboveCell = root:newline():tag('tr'):tag('td')
local aboveCell = root:newline():tag('tr'):tag('td')
aboveCell
aboveCell
:attr('colspan', data.imageleft and 3 or 2)
:attr('colspan', data.imageright and 3 or 2)
:addClass('mbox-text')
:addClass('mbox-text')
if data.textstyle then
if data.textstyle then
خط ۱۱۱: خط ۱۱۲:
end
end
textCell:wikitext(data.text)
textCell:wikitext(data.text)
if data.imageleft then
if data.imageright then
bodyRow:newline():tag('td')
bodyRow:newline():tag('td')
:addClass('mbox-imageleft')
:addClass('mbox-imageright')
:wikitext(data.imageleft)
:wikitext(data.imageright)
end
end


خط ۱۲۱: خط ۱۲۲:
local belowCell = root:newline():tag('tr'):tag('td')
local belowCell = root:newline():tag('tr'):tag('td')
belowCell
belowCell
:attr('colspan', data.imageleft and 3 or 2)
:attr('colspan', data.imageright and 3 or 2)
:addClass('mbox-text')
:addClass('mbox-text')
if data.textstyle then
if data.textstyle then
خط ۱۲۹: خط ۱۳۰:
end
end


root:newline()
return tostring(root)
return tostring(root)
end
end


return p
return p

نسخهٔ ‏۲۹ مهٔ ۲۰۱۹، ساعت ۱۴:۵۴

توضیحات این پودمان می‌تواند در پودمان:Side box/توضیحات قرار گیرد.

-- This module implements {{side box}}.

local yesno = require('Module:Yesno')

local p = {}

function p.main(frame)
	local origArgs = frame:getParent().args
	local args = {}
	for k, v in pairs(origArgs) do
		v = v:match('%s*(.-)%s*$')
		if v ~= '' then
			args[k] = v
		end
	end
	return p._main(args)
end

function p._main(args)
	local data = p.makeData(args)
	return p.renderSidebox(data)
end

function p.makeData(args)
	local data = {}

	-- Main table classes
	data.classes = {}
	if yesno(args.metadata) ~= false then
		table.insert(data.classes, 'metadata')
	end
	if args.position and args.position:lower() == 'left' then
		table.insert(data.classes, 'mbox-small-left')
	else
		table.insert(data.classes, 'mbox-small')
	end
	table.insert(data.classes, args.class)
	
	-- Image
	if args.image and args.image ~= 'none' then
		data.image = args.image
	end

	-- Copy over data that doesn't need adjusting
	local argsToCopy = {
		-- Styles
		'style',
		'textstyle',

		-- Above row
		'above',
		'abovestyle',

		-- Body row
		'text',
		'imageright',

		-- Below row
		'below',
	}
	for i, key in ipairs(argsToCopy) do
		data[key] = args[key]
	end

	return data
end

function p.renderSidebox(data)
	-- Renders the sidebox HTML.

	-- Table root
	local root = mw.html.create('table')
	root:attr('role', 'presentation')
	for i, class in ipairs(data.classes or {}) do
		root:addClass(class)
	end
	root:css{border = '1px solid #aaa', ['background-color'] = '#f9f9f9', color = '#000'}
	if data.style then
		root:cssText(data.style)
	end

	-- The "above" row
	if data.above then
		local aboveCell = root:newline():tag('tr'):tag('td')
		aboveCell
			:attr('colspan', data.imageright and 3 or 2)
			:addClass('mbox-text')
		if data.textstyle then
			aboveCell:cssText(data.textstyle)
		end
		if data.abovestyle then
			aboveCell:cssText(data.abovestyle)
		end
		aboveCell
			:newline()
			:wikitext(data.above)
	end

	-- The body row
	local bodyRow = root:newline():tag('tr'):newline()
	if data.image then
		bodyRow:tag('td')
			:addClass('mbox-image')
			:wikitext(data.image)
	else
		bodyRow:tag('td'):css('width', '1px')
	end
	local textCell = bodyRow:newline():tag('td')
	textCell:addClass('mbox-text plainlist')
	if data.textstyle then
		textCell:cssText(data.textstyle)
	end
	textCell:wikitext(data.text)
	if data.imageright then
		bodyRow:newline():tag('td')
			:addClass('mbox-imageright')
			:wikitext(data.imageright)
	end

	-- The below row
	if data.below then
		local belowCell = root:newline():tag('tr'):tag('td')
		belowCell
			:attr('colspan', data.imageright and 3 or 2)
			:addClass('mbox-text')
		if data.textstyle then
			belowCell:cssText(data.textstyle)
		end
		belowCell:wikitext(data.below)
	end

	root:newline()
	return tostring(root)
end

return p