From f6335a5099c90a8e320a9269941329efbe75dd47 Mon Sep 17 00:00:00 2001
From: Franck Cuny <franck.cuny@gmail.com>
Date: Sun, 16 Feb 2020 16:42:51 -0800
Subject: org: delete the custom commands for the agenda

I don't use them. Let's start fresh and simple with the default
settings, and we can build from there.
---
 emacs.d/custom/fcuny-org.el | 112 --------------------------------------------
 1 file changed, 112 deletions(-)

(limited to 'emacs.d')

diff --git a/emacs.d/custom/fcuny-org.el b/emacs.d/custom/fcuny-org.el
index 1ffeeef..7ae92ca 100644
--- a/emacs.d/custom/fcuny-org.el
+++ b/emacs.d/custom/fcuny-org.el
@@ -75,118 +75,6 @@ _g n_: go to notes
   (org-agenda-files `(,org-default-tasks-file
                       ,org-default-work-tasks-file))
 
-  (org-agenda-custom-commands
-   (quote
-    (("h" "Hotlist (what's important and due soon)"
-      ((tags-todo "DEADLINE<\"<+0d>\""
-                  ((org-agenda-overriding-header "OVERDUE")))
-       (tags-todo "DEADLINE>=\"<+0d>\"+DEADLINE<=\"<+1w>\""
-                  ((org-agenda-overriding-header "DUE IN NEXT 7 DAYS")))
-       (tags-todo "DEADLINE=\"\"+PRIORITY={A}|DEADLINE>\"<+1w>\"+PRIORITY={A}"
-                  ((org-agenda-overriding-header "HIGH PRIORITY"))))
-      ((org-agenda-todo-ignore-scheduled 'future)
-       (org-agenda-sorting-strategy '(deadline-up))))
-
-     ("w" . "Work...")
-
-     ("wf" "Work Today"
-      ((tags-todo "DEADLINE=\"<+0d>\""
-                  ((org-agenda-overriding-header "Due today")
-                   (org-agenda-skip-function
-                    '(org-agenda-skip-entry-if 'notdeadline))
-                   (org-agenda-sorting-strategy '(priority-down))))
-       (tags-todo "DEADLINE<\"<+0d>\""
-                  ((org-agenda-overriding-header "Overdue")
-                   (org-agenda-skip-function
-                    '(org-agenda-skip-entry-if 'notdeadline))
-                   (org-agenda-sorting-strategy '(priority-down))))
-       (tags-todo "TODO={STARTED}"
-                  ((org-agenda-overriding-header "Started")
-                   (org-agenda-sorting-strategy '(priority-down))))
-       (agenda ""
-               ((org-agenda-entry-types '(:scheduled))
-                (org-agenda-overriding-header "Scheduled")
-                (org-agenda-skip-function
-                 '(org-agenda-skip-entry-if 'todo 'done))
-                (org-agenda-sorting-strategy
-                 '(priority-down time-down))
-                (org-agenda-span 'day)
-                (org-agenda-start-on-weekday nil)
-                (org-agenda-time-grid nil)))
-
-       (tags "TODO={MEETING}+CREATED>\"<-7d>\""
-             ((org-agenda-overriding-header "Recent meetings (last 7 days)")))
-       (tags "TODO={NOTE}+CREATED>\"<-7d>\""
-             ((org-agenda-overriding-header "Recent notes (last 7 days)"))))
-      ((org-agenda-files `(,org-default-work-tasks-file))
-       (org-agenda-sorting-strategy '(deadline-up))))
-
-     ("wp" "For 1:1"
-      ((tags "people&TODO={TODO\\|STARTED}"
-             ((org-agenda-overriding-header "Tasks for 1:1")))
-       ((org-agenda-files `(,org-default-work-tasks-file)))))
-
-     ("wt" "Triage unscheduled tasks"
-      ((tags "work&TODO<>\"\"&TODO<>{DONE\\|CANCELED\\|NOTE\\|MEETING\\|PROJECT}"
-             ((org-agenda-overriding-header "Unscheduled tasks: ")
-              (org-agenda-skip-function
-               (quote
-                (org-agenda-skip-entry-if
-                 (quote scheduled)
-                 (quote deadline)
-                 (quote timestamp)
-                 (quote regexp)
-                 "\\* \\(SOMEDAY\\)")))
-              (org-agenda-sorting-strategy
-               (quote
-                (category-up)))
-              (org-agenda-prefix-format "%-11c%5(fcuny/org-todo-age) "))))
-      ((org-agenda-files `(,org-default-tasks-file
-                           ,org-default-work-tasks-file))))
-
-     ("wP" "Work project"
-      ((tags "TODO={PROJECT}"
-             ((org-agenda-overriding-header "All work projects"))))
-      ((org-agenda-files `(,org-default-work-tasks-file))))
-
-     ("ws" "Someday tasks"
-      ((tags-todo "TODO={SOMEDAY}"
-                  ((org-agenda-overriding-header "NO DUE DATE / SOMEDAY")
-                   (org-agenda-skip-function
-                    '(org-agenda-skip-entry-if 'deadline)))))
-      ((org-agenda-files `(,org-default-work-tasks-file))))
-
-     ("p" . "Personal ...")
-     ("pt" "Personal Today"
-      ((tags-todo "DEADLINE=\"<+0d>\""
-                  ((org-agenda-overriding-header "Due today")
-                   (org-agenda-skip-function
-                    '(org-agenda-skip-entry-if 'notdeadline))
-                   (org-agenda-sorting-strategy '(priority-down))))
-       (tags-todo "DEADLINE<\"<+0d>\""
-                  ((org-agenda-overriding-header "Overdue")
-                   (org-agenda-skip-function
-                    '(org-agenda-skip-entry-if 'notdeadline))
-                   (org-agenda-sorting-strategy '(priority-down))))
-       (tags-todo "TODO={STARTED}"
-                  ((org-agenda-overriding-header "Started")
-                   (org-agenda-sorting-strategy '(priority-down))))
-       (tags "TODO={NOTE}+CREATED>\"<-7d>\""
-             ((org-agenda-overriding-header "Recent notes (last 7 days)")))
-       (agenda ""
-               ((org-agenda-entry-types '(:scheduled))
-                (org-agenda-overriding-header "Scheduled")
-                (org-agenda-skip-function
-                 '(org-agenda-skip-entry-if 'todo 'done))
-                (org-agenda-sorting-strategy
-                 '(priority-down time-down))
-                (org-agenda-span 'day)
-                (org-agenda-start-on-weekday nil)
-                (org-agenda-time-grid nil))))
-      ((org-agenda-files `(,org-default-tasks-file
-                           ,org-default-notes-file))
-       (org-agenda-sorting-strategy '(deadline-up)))))))
-
   ;; org babel related
   ;; prevent the conversion of spaces into tabs (necessary for Python code exports)
   (org-src-fontify-natively t)
-- 
cgit 1.4.1