@2> 最適化 <@local(x,t)> <@>フレーム内処理 <@> システムモード <$v.system_mode()> <@> <@> 現在の設定読み込み <$s = v.daybook_setting> <$d = copy(s)> <$daybook_title = d.title> <$d.title = undef> <@> Now の内容を d の中へコピー <$into(d, v.now)> <$d.name = Auth.name> <$v.title ="日記を書く - " . s.blog_name> <@> <@> ログインしていない <$ifjump(!Auth.ok && ENV.REQUEST_METHOD ne 'POST', 'login')> <@> <@> 日記帳が存在しない/権限がない <$ifexec(!v.exsits_daybook || ! v.allow_edit, begin)> <$redirect( v.myself . '?daybook_create' )> <$end> <@> 日記モードならば、新規編集時に同一日の日記をチェック <$ifexec(s.diary_mode==1 && !Pinfo#0, begin, begin)> <$yyyymmdd = d.year . d.mon . d.day> <$load = v.load_diary(1, undef, yyyymmdd) #0 > <@> 同一日の記事が存在すれば、それを編集 <$ifexec(defined load, begin)> <$d = load> <$edit_pkey = d.pkey> <$end> <$else> <@> 編集モードなら日記をロード <$ifexec(Pinfo#0, begin)> <$d = v.load_diary(1) # 0> <$ifexec(defined d && (v.diary_pkey_selected || (s.diary_mode==1 && v.day_selected)), begin, begin)> <$edit_pkey = d.pkey> <$else> <$ifmessage(! POST, '指定の日記がみつかりません')> <$end> <$end> <$end> <$wiki = if(edit_pkey || d.priority ne '', d.priority, d.wiki)> <@> エラーチェックと表示 <@call('sub/error_message', 1)> <@> 他人の日記帳? <@call('sub/other_daybook_check')> <@> JavaScript <@ifexec(! wiki, begin)> <$end>