max/doom-config
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Exclude someday.org from agenda files

Browse Source
This commit is contained in:
Max Schlueter 2023-10-01 16:24:06 +02:00
parent 6b067d40d2
commit 0d8c0a6164
1 changed files with 26 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

48
gtd.el
View File

@ -3,11 +3,15 @@
(after! org (after! org
(setq org-return-follows-link t (setq org-return-follows-link t
org-complete-tags-always-offer-all-agenda-tags t org-complete-tags-always-offer-all-agenda-tags t
org-agenda-files (mapcar 'file-truename org-agenda-files (mapcar (lambda (filename) (expand-file-name filename org-directory))
(file-expand-wildcards (concat org-directory "gtd/*.org")))) '("gtd/inbox.org"
;; org-agenda-files (append (mapcar 'file-truename "gtd/tasks.org"
;; (file-expand-wildcards (concat org-directory "gtd/*.org"))) "gtd/journal.org"
;; (list (expand-file-name (funcall #'gtd-get-current-journal) org-directory)))) "gtd/calendar.org")))
;; (file-expand-wildcards (concat org-directory "gtd/*.org"))))
;; org-agenda-files (append (mapcar 'file-truename
;; (file-expand-wildcards (concat org-directory "gtd/*.org")))
;; (list (expand-file-name (funcall #'gtd-get-current-journal) org-directory))))
(setq org-capture-templates (setq org-capture-templates
`(("i" "Inbox" entry (file "gtd/inbox.org") `(("i" "Inbox" entry (file "gtd/inbox.org")
,(concat "* %?\n" ,(concat "* %?\n"
@ -25,27 +29,27 @@
org-refile-target-verify-function (lambda (&rest _) (null (org-get-todo-state))) org-refile-target-verify-function (lambda (&rest _) (null (org-get-todo-state)))
;; org-refile-target-verify-function nil ;; org-refile-target-verify-function nil
;; org-refile-targets '(("tasks.org" . (:maxlevel . 2)))) ;; org-refile-targets '(("tasks.org" . (:maxlevel . 2))))
org-refile-targets '(("tasks.org" . (:maxlevel . 2)) org-refile-targets `(("tasks.org" . (:maxlevel . 2))
("someday.org" . (:level . 0))))) (,(expand-file-name "gtd/someday.org" org-directory) . (:maxlevel . 1)))))
;; Getting the following on capture: ;; Getting the following on capture:
;; ;;
;; Greedy org-protocol handler. Killing client. ;; Greedy org-protocol handler. Killing client.
;; No server buffers remain to edit ;; No server buffers remain to edit
;; ;;
;; See https://github.com/alphapapa/org-protocol-capture-html/issues/40 ;; See https://github.com/alphapapa/org-protocol-capture-html/issues/40
;; (use-package! org-protocol-capture-html ;; (use-package! org-protocol-capture-html
;; :after org-protocol ;; :after org-protocol
;; :config ;; :config
;; (add-to-list 'org-capture-templates ;; (add-to-list 'org-capture-templates
;; '("w" "Website" entry (file "") ;; '("w" "Website" entry (file "")
;; "* %a :website:\n\n%U %?\n\n%:initial")) ;; "* %a :website:\n\n%U %?\n\n%:initial"))
(defun gtd-capture-inbox () (defun gtd-capture-inbox ()
(interactive) (interactive)
(org-capture nil "i")) (org-capture nil "i"))
(map! "C-c i" #'gtd-capture-inbox) (map! "C-c i" #'gtd-capture-inbox)