                                                 '("IN" "CANCELLED" "WAITING" "SOMEDAY" "MAYBE" "HOLD" "TOREAD" "TOLISTEN" "TOWATCH" "FLAGGED" "REVIEW" "NOTE" "SHOPPING")
                                                 'project)))))
       nil)
-     ("e" "Completed entries" tags "CLOSED<\"<-7d>\"|TODO=\"DONE\"+CLOSED=\"\""
-      ((org-agenda-overriding-header "Completed entries:")
-       (org-agenda-skip-function
-        '(pjs-org-agenda-skip-entry-if 'active))))
+     ("e" "Completed entries"
+      ((agenda ""
+               ((org-agenda-span 'day)
+                (org-agenda-skip-function
+                 '(pjs-org-agenda-skip-subtree-if 'tag
+                                                  '("NOTE" "REVIEW")
+                                                  'todo 'done))))
+       (tags "CLOSED<\"<-7d>\"|TODO=\"DONE\"+CLOSED=\"\""
+             ((org-agenda-overriding-header "Completed entries:")
+              (org-agenda-skip-function
+               '(pjs-org-agenda-skip-entry-if 'active)))))
+      nil)
      ("#" "Stuck projects"
-      ((tags "*"
+      ((agenda ""
+               ((org-agenda-span 'day)
+                (org-agenda-skip-function
+                 '(pjs-org-agenda-skip-subtree-if 'tag
+                                                  '("NOTE" "REVIEW")
+                                                  'todo 'done))))
+       (tags "*"
              ((org-agenda-overriding-header "Stuck projects (>90 days):")
               (org-agenda-skip-function
                '(pjs-org-agenda-skip-entry-if 'tag

              (org-agenda-skip-function
               '(pjs-org-agenda-skip-entry-if 'nottag "TOLISTEN")))))
      nil nil)
     ("aw" "Weekly review agenda; agenda for past week, waiting, archivable, stuck projects, someday, maybe, hold"
      ((agenda ""
               ((org-agenda-span 'week)
                (org-agenda-start-day "-7d")

     ("j" "Journal")
     ("jj" "Journal to file" entry
      (file+olp+datetree "journal.org")
      "* %T
:PROPERTIES:
:CREATED: %U
:END:
- %?")
     ("jc" "Journal to clocked entry" entry #'pjs-org-capture-journal "* %T
:PROPERTIES:
:CREATED: %U
:END:
- %?")
     ("v" "Event" entry
      (file "todo.org")
      "* %^{Description}
