emacsで時刻計算

　emacsで日付計算するときに必要になりそうだったのでメモ

(setq time (decode-time (current-time))) ;; timeに現在時刻をデコードしてセット
(setf (elt time 3) (+ (elt time 3) 1)) ;; 日付を明日にする
(decode-time (apply 'encode-time time)) ;; 明日の日付をデコードして取得
(format-time-string "%Y/%m/%d" (apply 'encode-time time)) ;; %Y/%m/%d形式にして取得

これで日付を簡単に計算できる。もっと簡単にできる方法があると思うけど、自分が思いつくのはこれくらい。
仮にsetfの第二引数に365日が入ったとしてもデコードするとちゃんとした日付を出してくれた。
厳密でないならこれでいいと思う