@>
<@> はてな/adiary形式
<@>
<$logs = argv#0>
<$option = argv#1>
<@ifexec(! logs, begin)>
はてな形式 |
問題を含むUTF-8マップで出力する(はてなでは必須)※技術情報
タイトルを見出しとして出力し、「*見出し」を「**見出し」に置き換える
タイトルを見出しとして出力する際、時刻情報を付ける
標準パーサテキストもHTMLとして出力する(出力が崩れる場合に使用)
※非表示の日記出力時はコメント(<!-- 〜 -->)中に展開されます
※はてなでは、同一日の記事は1つにまとめられます(blogモード以外)。
|
<$break()>
<$end>
<@>-----------------------------------------------------------------------------
<@> はてな形式 exporter
<@>-----------------------------------------------------------------------------
<$exporter = loadpm('Diary::ExportHatena')>
<$ifbreak(error_flag)>
<$ifexec(Debug_mode, begin)><$print("Content-Type: text/plain; charset=UTF-8;\n\n")><$end>
<$print("Content-Disposition: attachment; filename=<@v.diary_id><@option.year>_export_hatena.xml\n")>
<$print("Content-Type: text/xml; charset=UTF-8;\n\n")>
<$print("\n")>
<$print("")>
<$exporter.export( begin.day, logs, option )><$t=tmp>
<$tag_escape_for_xml(t.title, t.category, t.name, t.agent, t.files, t.body)>
<@t.body>
<@>
<@> コメントの生成
<@>
<@ifexec(! option.no_comment, begin.comment )>
<@forexec(t2, v.load_comments(t), begin)>
<$tag_escape_for_xml(t2.name, t2.text)>
<@t2.name>
<@t2.tm>
<@t2.text>
<$end>
<$end.comment>
<@>
<@> トラックバックの生成
<@>
<@ifexec(! option.no_tb, begin.trackback )>
<@forexec(t2, v.load_trackbacks(t), begin)>
<$tag_escape_for_xml(t2.title, t2.excerpt, t2.blog_name, t2.author)>
<@t2.enable>
<@t2.tm>
<@t2.title>
<@t2.excerpt>
<@t2.url>
<@t2.blog_name>
<@t2.author>
<$end>
<$end.trackback>
<$end.day>
<@>
<@> フッタ
<@>
<$print( "\n" )>
<$exit(0)>