<@2> <@> <@> adiary形式 <@> <$logs = argv#0> <$option = argv#1> <@ifexec(! logs, begin)> adiary形式 標準形式です。唯一、すべての情報をバックアップできます。
key記法による日記帳内リンクを時刻指定に書き換え(リンク先保持)
id記法を通常リンクに書き換え(ログ移転時のリンク先保持)
<$break()> <$end> <@>----------------------------------------------------------------------------- <@> adiary形式 exporter <@>----------------------------------------------------------------------------- <$exporter = loadpm('Diary::Export_adiary')> <$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_adiary.xml\n")> <$print("Content-Type: text/xml; charset=UTF-8;\n\n")> <$print("\n")> <$print("\n")> <$exporter.export( begin.day, logs, option )> <$tag_escape_for_xml(t.title, t.category, t.name, t.agent, t.files, t._text)> <@t._text> <@> <@> コメントの生成 <@> <@ifexec(! option.no_comment, begin.comment )> <@forexec(t2, v.load_comments(t), begin)> <$tag_escape_for_xml(t2.name, t2.url, t2.text)> <@t2.enable> <@t2.hidden> <@t2.id> <@t2.name> <@t2.tm> <@t2.email> <@t2.url> <@t2.ip> <@t2.host> <@t2.agent> <@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> <@t2.ip> <@t2.host> <@t2.agent> <$end> <$end.trackback> <$end.day> <@> <@> フッタ <@> <$print( "\n" )> <$exit(0)>