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