<@2> ログイン確認 <$ifjumpclear(! Auth.ok, 'sub/error_message', 0, 'ログインしていません')> <@> システムモード <$v.system_mode()> <$ifset(v.diary_id eq '', v.title, '管理メニュー')> <$menu_mode=1> <@> <@>存在しない日記帳管理画面なら自分の管理画面へ <$ifexec(! v.exsits_daybook && v.others_daybook, begin)> <$redirect( v.myself3p . '?menu' )> <$end> <@> <$set = v.daybook_setting> <@call('sub/error_message', 0)> <@> ■管理メニュー
<@> <$ifbreak( ! v.allow_edit )> <@>------------------------------------------------------------------------------ <@> 新着リストの表示 <@>------------------------------------------------------------------------------ <$last_tm = set.newcome_tm, flag_c=flag_tb=0> <$h = new, h.cache_on = 1> <$newcome = exec(begin.newcome)> <$h.type="comment"><$ifset(set.recent_comment_int<5, h.limit, 5, set.recent_comment_int)> <$logs = v.load_list( h )> <@ifexec(h.hits, begin)> ○最近のコメント
日時 書いた人 元記事
<@forexec(t, logs, begin)> <@tm_printf('%m/%d', t.tm)> <@if(last_tm < t.tm && Auth.id ne t.id, '')><$ifset(last_tm < t.tm && Auth.id ne t.id, flag_c, 1)> <@if(!t.enable, '[非]')><@t.name> <@t.diary_title>
<$end>
<$end> <$h.type="trackback"><$ifset(set.recent_trackback_int<5, h.limit, 5, set.recent_trackback_int)> <$logs = v.load_list( h )> <@ifexec(h.hits, begin)>
○最近のトラックバック
日時 書いた人 受付記事
<@forexec(t, logs, begin)> <@tm_printf('%m/%d', t.tm)> <@ifexec(last_tm < t.tm && index(t.url, "<@v.server_url><@v.myself>") != 0, begin)><$flag_tb=1><$end> <@if(!t.enable, '[非]')><@t.author> <@t.diary_title>
<$end>
<$end> <$end.newcome> <@> <@>
■新着リスト
<@ifexec(flag_c || flag_tb || set.newcome_flag, begin)>
新着<@if(flag_c, 'コメント')><@if(flag_c && flag_tb, '・')><@if(flag_tb, 'トラックバック')>があります
<$end> <@newcome>