@2>
<@local(opt)>
<@>
<@> Movable Type形式
<@>
<$logs = argv#0>
<$opt = argv#1>
<@ifexec(! logs, begin)>
Movable Type形式(MT)
<$break()>
<$end>
<@>-----------------------------------------------------------------------------
<@> Movable Type形式 exporter
<@>-----------------------------------------------------------------------------
<$exporter = loadapp('adiary::ExportMT')>
<$ifbreak(!exporter)>
<$ifset(!opt.allow_pings, opt.allow_pings, 0)>
<$ifexec(Export_debug, begin)>
<$output_http_headers('text/plain', opt.charset)>
<$end>
<$set_header('Content-Disposition', "attachment; filename=<@opt.base_filename>_export_mt.txt")>
<$output_http_headers('text/plain', opt.charset)>
<$exporter.export( begin.day, logs, opt )>
<@local(t,t2)>
<$t = argv#0>
AUTHOR: <@t.name>
TITLE: <@t.title>
STATUS: <@t.status>
CONVERT BREAKS: <@t.convert_breaks>
ALLOW COMMENTS: <@t.com_ok>
ALLOW PINGS: <@opt.allow_pings>
DATE: <@tm_printf("%m/%d/%Y %H:%M:%S", t.tm, 0)>
<@forexec(t2, t.tags_ary, begin)>
CATEGORY: <@t2>
<$end>
-----
BODY:
<@t.body>
-----
EXTENDED BODY:
<@t.ex_body>
-----
EXCERPT:
-----
KEYWORDS:
-----
<@>
<@> コメントの生成
<@>
<@ifexec(! opt.no_comment, begin.comment )>
<@forexec(t2, v.load_comments_current_blog(t), begin)>
COMMENT:
AUTHOR: <@t2.name>
EMAIL: <@t2.email>
URL: <@t2.url>
IP: <@t2.ip>
DATE: <@tm_printf("%m/%d/%Y %H:%M:%S", t2.tm, 0)>
<@@exporter.br2lf( t2.text )>
-----
<$end>
<$end.comment>
--------
<$end.day>
<@>
<@> 終了
<@>
<$export_return = 0>