; Unix-Timestamp (global-set-key #\C-2 #'(lambda () (interactive) (with-output-to-selected-buffer (format t "~d" (- (get-universal-time) (encode-universal-time 0 0 9 1 1 1970)))))) ; xml datetime (global-set-key #\C-1 #'(lambda () (interactive) (let (date) (setq date (format-date-string "%Y-%m-%dT%H:%M:%S%Z")) (insert (concat (substring date 0 -2) ":" (substring date -2)))))) ;%Z => "+0900" -> "+09:00"
これなしじゃ生きれない!
それと pre を使うときは CDATA で囲ってる……そうしないとインデントされてしまうから……