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