<@2> ログイン確認 <$ifjumpclear(! Auth.ok, 'sub/error_message', 0, 'ログインしていません')> <@> システムモード <$v.system_mode()> <$v.title = '管理メニュー'> <@>Satsuki-systemのキャッシュチェック <$ifmessage(Auth.admin && __cache_dir eq '', 'キャッシュディレクトリに書き込めないためパフォーマンスが低下しています。__cache/ のパーミッションを確認してください。')> <@>ユーザーが登録されてなければ、登録画面へ <$ifjump(Auth.auto, 'user_edit')> <@>アップグレードチェック <$ifjumpclear(Auth.admin && v.check_upgrade(), 'root_upgrade')> <@>存在しない日記帳管理画面なら自分の管理画面へ <$ifexec(! v.exsits_daybook && (v.others_daybook || v.diary_id eq ''), begin)> <$redirect( v.myself3 . '?menu' )> <$end> <$set = v.daybook_setting> <@call('sub/error_message', 0)>

管理メニュー

<@ifexec(! v.exsits_my_daybook && (!v.root_only_daybook_create || Auth.admin), begin)>

日記帳を作る

<$end> <@ifexec(set.blog_name ne '', begin)>

<@set.blog_name>

<$end>
<$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<8, h.limit, 8, set.recent_comment_int)> <$logs = v.load_list( h )> <@ifexec(h.hits, begin)>

最近のコメント

<@forexec(t, logs, begin)> <$end>
新着表示非公開コメント日時書いた人元記事内容
<@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, '表')> <@if(t.hidden, '非')> <@tm_printf('%m/%d %J:%M', t.tm)> <@t.name> <@t.year>-<@t.mon>-<@t.day> <@t.diary_title> <@t.text_short>
<$end> <$h.type="trackback"><$ifset(set.recent_trackback_int<8, h.limit, 8, set.recent_trackback_int)> <$h.flag=new; h.flag.internal = 0><@> 内部TBは表示しない <$logs = v.load_list( h )> <@ifexec(h.hits, begin)>

最近のトラックバック

<@forexec(t, logs, begin)> <$end>
新着表示日時書いた人記事内容
<@ifexec(last_tm < t.tm && index(t.url, "<@v.server_url><@v.myself>") != 0, begin)><$flag_tb=1><$end> <@if(t.enable, '表')> <@tm_printf('%m/%d %J:%M', t.tm)> <@t.author> <@t.year>-<@t.mon>-<@t.day> <@t.diary_title> <@t.title> <@if(t.blog_name, "(<@t.blog_name>)")>
<$end> <$end.newcome>

新着リスト

<@ifexec(flag_c || flag_tb || set.newcome_flag, begin)>
新着<@if(flag_c, 'コメント')><@if(flag_c && flag_tb, '・')><@if(flag_tb, 'トラックバック')>があります   <@ifexec(set.newcome_flag && !flag_c && !flag_tb, begin)>

※新着がなくても新着報告されることがありますが、仕様ですのでご了承ください。

<$end>
<$end> <@newcome> <$> 以下はコメントアウト <$h.type="diary"><$h.limit=10> <$logs = v.load_list( h )>

最近投稿された記事

<@ifexec(h.hits, begin, begin)> <@forexec(t, logs, begin)> <$end>
公開投稿日日付タイトル投稿者
<@if(t.enable, '公開')> <@tm_printf('%m/%d %J:%M', t.tm)> <@t.year>-<@t.mon>-<@t.day> <@t.title> <@t.name>
<$else>

該当なし

<$end>