TaskPaper良さげだなーとか思いつつ
(defun my-insert-done () (interactive) (end-of-line) (insert (concat " @done(" (format-time-string "%Y-%m-%d") ")")))
こんだけ
テスト
hogeraの行にカーソル置いて「M-x my-insert-done」
index: - hogera - mogera
実行結果
index: - hogera @done(2009-03-05) - mogera