cannot do what I want...need to think

This commit is contained in:
petrucci4prez 2018-04-05 23:17:16 -04:00
parent 8269f17746
commit 1702b022af
2 changed files with 10 additions and 9 deletions

11
conf.el
View File

@ -563,12 +563,13 @@ Using this scheme, we simply compare the magnitude of the statuscodes"
;; '(category-keep))))))) ;; '(category-keep)))))))
(setq org-agenda-tags-todo-honor-ignore-options t) (setq org-agenda-tags-todo-honor-ignore-options t)
(setq testy 'tags)
(setq org-agenda-custom-commands (setq org-agenda-custom-commands
'((" " "Agenda" `((" " "Agenda"
((if t '(agenda "" nil))) ((agenda "" nil)
;; (tags "REFILE" (,testy "REFILE"
;; ((org-agenda-overriding-header (if nd/agenda-project-view "Tasks to Refile" "Herro")) ((org-agenda-overriding-header (if nd/agenda-project-view "Tasks to Refile" "Herro"))
;; (org-tags-match-list-sublevels nil))) (org-tags-match-list-sublevels nil))))
;; (if nd/agenda-project-view ;; (if nd/agenda-project-view
;; ,(macroexpand '(nd/agenda-base-task-command "Atomic Tasks" 'nd/skip-non-atomic-tasks)) ;; ,(macroexpand '(nd/agenda-base-task-command "Atomic Tasks" 'nd/skip-non-atomic-tasks))
;; ,(macroexpand '(nd/agenda-base-project-command "Active Projects" 'nd/skip-non-active-projects)))) ;; ,(macroexpand '(nd/agenda-base-project-command "Active Projects" 'nd/skip-non-active-projects))))

View File

@ -761,10 +761,10 @@ tags in the custom commands section but I find this easier to maintain and possi
(setq org-agenda-tags-todo-honor-ignore-options t) (setq org-agenda-tags-todo-honor-ignore-options t)
(setq org-agenda-custom-commands (setq org-agenda-custom-commands
'((" " "Agenda" '((" " "Agenda"
((if t '(agenda "" nil))) ((agenda "" nil)
;; (tags "REFILE" (tags "REFILE"
;; ((org-agenda-overriding-header (if nd/agenda-project-view "Tasks to Refile" "Herro")) ((org-agenda-overriding-header (if nd/agenda-project-view "Tasks to Refile" "Herro"))
;; (org-tags-match-list-sublevels nil))) (org-tags-match-list-sublevels nil))))
;; (if nd/agenda-project-view ;; (if nd/agenda-project-view
;; ,(macroexpand '(nd/agenda-base-task-command "Atomic Tasks" 'nd/skip-non-atomic-tasks)) ;; ,(macroexpand '(nd/agenda-base-task-command "Atomic Tasks" 'nd/skip-non-atomic-tasks))
;; ,(macroexpand '(nd/agenda-base-project-command "Active Projects" 'nd/skip-non-active-projects)))) ;; ,(macroexpand '(nd/agenda-base-project-command "Active Projects" 'nd/skip-non-active-projects))))