日付変更時間の設定

Index: simple-hatena-mode.el
===================================================================
--- simple-hatena-mode.el       (revision 454)
+++ simple-hatena-mode.el       (working copy)
@@ -91,6 +91,12 @@
   "はてなダイアリーライターのログインに、cookieを利用するかどうか
 を指定するフラグ。実行時に、-cオプションとして使われる。")
 
+(defcustom simple-hatena-time-offset nil
+  "日付を計算する際に用いるオフセット。
+6 に設定すると午前6時まで前日の日付として扱われる"
+  :type 'integer
+  :group 'simple-hatena)
+
 ;; キーバインド
 (setq simple-hatena-mode-map (make-keymap))
 
@@ -375,7 +381,9 @@
                                (encode-time s min h (+ d i) mon y)))
          (if date
              (append '(0 0 0) date)
-           (decode-time))))
+           (apply (lambda (s min h d mon y &rest rest)
+                    (list s min (- h (or simple-hatena-time-offset 0)) d mon y))
+                  (decode-time)))))
 
 (defun simple-hatena-internal-go-for (i)
   "引数の数だけ前後の日付のファイ名バッファへ移動する。"

できた。こんなのでいいかな。