準備

Emacsユーザなので日記はEmacsで書きたい。
だったら「はてダラ」をEmacs内で使えばいいのかな。
では送信！

hatena-modeの存在は知っているが、hw.plを使っていないようなので自分でelispをでっちあげてみる。

(defvar hatena-dir "~/memo/hatena")
(defun hatena ()
  "Open today's hatena diary file."
  (interactive)
  (find-file
   (concatenate 'string hatena-dir "/"
                (format-time-string "%Y-%m-%d.txt" (current-time)))))

(define-derived-mode myhatena-mode yahtml-mode "hatena"
  "Simple hatena diary mode."
  (define-key myhatena-mode-map "\C-c\C-c" 'myhatena-submit)
  )
(add-to-list 'auto-mode-alist '("memo/hatena/.+txt$" . myhatena-mode))

(defun myhatena-submit ()
  "Submit hatena diary file."
  (interactive)
  (compile "hw.pl"))

はてな記法の学習はそのうち。