今何時か知りたい. そんなときに、便利なコマンド.

time-now

超ビッグな表示で、時間が表示される.

(defun my:time-now () 
  (interactive) 
  (let ((temp-buffer-show-function 'switch-to-buffer)) 
  (with-output-to-temp-buffer "*time-now*" 
    (princ (format-time-string "%H:%M"))) 
    (setq buffer-face-mode-face '(:height 2000)) 
    (buffer-face-mode))) 
(global-set-key (kbd "C-<f9>") 'my:time-now)

時間を確認したら、q を押して閉じる.

またこんなことで時間を潰してしまった。。。

以上、Happy Hacking!!