[Orgmode] Displaying your Org agenda after idle time

[John Wiegley]

I have the following snippet in my .emacs file, which I find very useful.  
Basically what it does is that if I don't touch my Emacs for 5 minutes, it 
displays the current agenda.  This keeps my tasks "always in mind" whenever I 
come back to Emacs after doing something else, whereas before I had a tendency 
to forget that it was there.

John

(defun jump-to-org-agenda ()
  (interactive)
  (let ((buf (get-buffer "*Org Agenda*"))
        wind)
    (if buf
        (if (setq wind (get-buffer-window buf))
            (select-window wind)
          (if (called-interactively-p)
              (progn
                (select-window (display-buffer buf t t))
                (org-fit-window-to-buffer)
                ;; (org-agenda-redo)
                )
            (with-selected-window (display-buffer buf)
              (org-fit-window-to-buffer)
              ;; (org-agenda-redo)
              )))
      (call-interactively 'org-agenda-list)))
  ;;(let ((buf (get-buffer "*Calendar*")))
  ;;  (unless (get-buffer-window buf)
  ;;    (org-agenda-goto-calendar)))
  )

(run-with-idle-timer 300 t 'jump-to-org-agenda)