(defvar *re/org-agenda-waiting*\r
'(todo "WAITING" ((org-agenda-overriding-header ""))))\r
\r
+(defvar *re/org-agenda-done*\r
+ '(tags "-recurring+LEVEL=1/DONE|BELAYED|GIVEN"))\r
+\r
(setq org-agenda-custom-commands `(("i" "Inbox" ,@*re/org-agenda-inbox*)\r
("n" "Next Actions" ,@*re/org-agenda-todo*)\r
("u" "Undertakings" ,@*re/org-agenda-undertakings*)\r
- ("w" "Waiting" ,@*re/org-agenda-waiting*)))\r
+ ("w" "Waiting" ,@*re/org-agenda-waiting*)\r
+ ("d" "Done" ,@*re/org-agenda-done*)))\r
#+END_SRC\r
**** Capture Templates\r
#+BEGIN_SRC emacs-lisp\r