From 08f2f54e3e830cd5fcaba83bbc1630102ce202b4 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Wed, 12 Aug 2020 20:44:22 -0700 Subject: Use a single file for all my org needs --- oni-org/oni-org.el | 41 +++++++++++++---------------------------- 1 file changed, 13 insertions(+), 28 deletions(-) (limited to 'oni-org') diff --git a/oni-org/oni-org.el b/oni-org/oni-org.el index 5c8539b..0fb63fd 100644 --- a/oni-org/oni-org.el +++ b/oni-org/oni-org.el @@ -4,7 +4,7 @@ ;; Author: Tom Willemse ;; Keywords: local -;; Version: 2020.0805.092134 +;; Version: 2020.0812.204341 ;; Package-Requires: (oni-yasnippet oni-alert oni-hydra org-plus-contrib org-bullets org-edna diminish all-the-icons org-roam) ;; This program is free software; you can redistribute it and/or modify @@ -186,9 +186,6 @@ _l_: Store link ^^ _j_: Journal entry ("A" (org-capture nil "a")) ("j" (org-capture nil "j"))) -(setq org-default-notes-file - (oni-org-expand-to-home "documents/gtd/inbox.org")) - (setq org-agenda-skip-function-global #'oni-org-skip-tasks) (setq org-agenda-tags-todo-honor-ignore-options t) (setq org-agenda-todo-ignore-scheduled 'future) @@ -212,8 +209,10 @@ _l_: Store link ^^ _j_: Journal entry (setq org-list-description-max-indent 5) (setq org-agenda-custom-commands - '(("c" "Today's (Current) tasks" tags "SCHEDULED=\"\"") - ("t" "Todo" tags-todo "-work-shopping") + '(("i" "Inbox" tags "-{.}+CATEGORY=\"everything\"") + ("t" "Next" tags-todo "TODO=\"NEXT\"") + ("S" "Someday" tags-todo "CATEGORY=\"todo\"") + ("c" "Today's (Current) tasks" tags "SCHEDULED=\"\"") ("w" . "Work topics") ("wo" "Overview" ((tags-todo "+work-remy-mia") (tags-todo "+work+idea+mia") @@ -223,20 +222,8 @@ _l_: Store link ^^ _j_: Journal entry ("wr" "Topics for Remy" tags-todo "+work+idea+remy") ("s" "Shopping" tags-todo "+shopping"))) -(setq org-agenda-files - (mapcar #'oni-org-expand-to-home - '("documents/gtd/todo.org"))) - -(setq org-refile-targets - (mapcar (lambda (pair) - (cons (oni-org-expand-to-home (car pair)) - (cdr pair))) - '(("documents/gtd/todo.org" :maxlevel . 1) - ("documents/gtd/projects.org" :level . 2) - ("documents/gtd/someday.org" :maxlevel . 1) - ("documents/gtd/music.org" :maxlevel . 1) - ("documents/gtd/books.org" :maxlevel . 1) - ("documents/gtd/bookmarks.org" :maxlevel . 2)))) +(setq org-default-notes-file "~/documents/gtd/everything.org") +(setq org-agenda-files (list org-default-notes-file)) (defun oni-org-find-heading-in-file (heading file &optional move) "Try to find HEADING somewhere in FILE. @@ -294,15 +281,13 @@ also move point to the start of the heading." '(("n" ((in-mode . "nov-mode"))))) (setq org-capture-templates - `(("i" "Inbox" entry - (file ,(oni-org-expand-to-home "documents/gtd/inbox.org")) - "* %?\n:PROPERTIES:\n:CREATED: %U\n:ORIGIN: %a\n:END:\n\n%i") - ("t" "Task" entry - (file ,(oni-org-expand-to-home "documents/gtd/inbox.org")) + `(("i" "Inbox" entry (file "") + "* %?\n:PROPERTIES:\n:CREATED: %U\n:ORIGIN: %a\n:END:\n\n") + ("I" "Inbox (add selection)" entry (file "") + "* %?\n:PROPERTIES:\n:CREATED: %U\n:ORIGIN: %a\n:END:\n\n#+begin_quote\n%i\n#+end_quote") + ("t" "Task" entry (file "") "* TODO %i%?\n :PROPERTIES:\n :CREATED: %U\n :END:") - ("a" "Appointment" entry - (file+headline ,(oni-org-expand-to-home "documents/gtd/todo.org") - "Appointments") + ("a" "Appointment" entry (file "") "* TODO %i%?\n %U") ("j" "Journal entry" entry (file+olp+datetree -- cgit v1.2.3-54-g00ecf