  '(org-agenda-cmp-user-defined 'pjs-org-agenda-sort-created)
  '(org-agenda-compact-blocks t)
  '(org-agenda-custom-commands
-   '(("a" . "Agendas daily, weekly, or otherwise")
-     ("ad" "Daily agenda; habits, priorities, reading, watching, listening"
+   '(("d" "Daily agenda; habits, priorities, reading, watching, listening"
       ((agenda ""
                ((org-agenda-span 'day)
                 (org-agenda-skip-function

              (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}
