コンテンツにスキップ

モジュール:Sakujo/sandbox

モジュールの解説[作成]
local p = {}
function p.Main(frame)
	if not mw.isSubsting() then
		-- subst展開されていない時
		return '<strong class="error">エラー: [[Help:テンプレート#テンプレートの内容で置き換える|subst:]] がありません。Sakujo ではなく subst:Sakujo としてください。</strong>'
	end
	
	-- subst展開されている時
	local subpagename = mw.text.trim(frame.args[1] or '')
	local lang = mw.getLanguage('ja')
	if subpagename == '' then
		subpagename = mw.title.getCurrentTitle().prefixedText
		local sakujosubpage = mw.title.new('Wikipedia:削除依頼/' .. subpagename)
		mw.logObject(sakujosubpage)
		if sakujosubpage.exists
		and string.find(sakujosubpage:getContent(), 'このページは以下にある削除依頼の議論を保存したものです。さらなる議論が必要な場合は当該ページのノートで行ってください。' , 1 , true)
		and tonumber(lang:formatDate('YmdHis' , frame:callParserFunction( 'REVISIONTIMESTAMP' , sakujosubpage.prefixedText ) .. '+ 1week' )) < tonumber(lang:formatDate('YmdHis')) then
			-- 指定されておらず、日付入りページ名を使う場合
			subpagename = subpagename .. ' ' .. lang:formatDate('Ymd' , '+9 hours')
		end
	end
	return '<!-- 削除についての議論が終了するまで、下記のメッセージ部分は除去しないでください。もしあなたがこのテンプレートを除去した場合、差し戻されます。またページが保護されることもあります。 --><noinclude>\n'
		.. '{{Sakujo/本体|' .. lang:formatDate('Y年n月j日' , '+9 hours') .. '|' ..  subpagename .. '}}\n'
		.. '</noinclude><!-- 削除についての議論が終了するまで、上記部分は削除しないでください。 -->'
	
end
return p