+org.el 3.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103
  1. ;;; package --- summary +org.el
  2. ;;; lexical-binding: t; -*-
  3. ;;; Commentary:
  4. ;;; Code:
  5. (setq +todo-file "~/org/inbox.org")
  6. (setq org-directory (expand-file-name "~/org/")
  7. org-journal-dir "~/org/journal/"
  8. org-startup-indented t
  9. org-agenda-files (list org-directory)
  10. org-pretty-entities t
  11. org-hide-emphasis-markers t
  12. org-hide-leading-stars t
  13. org-contacts-files '("~/org/contacts.org")
  14. ; attempt to return todo function to spacemacs
  15. evil-org-key-theme '(textobjects navigation additional insert todo)
  16. ;; show actually italicized text instead of /italicized text/
  17. org-agenda-block-separator ""
  18. org-fontify-whole-heading-line t
  19. org-fontify-done-headline t
  20. org-fontify-quote-and-verse-blocks t
  21. org-log-done 'time
  22. org-bullets-face-name (quote org-bullet-face)
  23. org-bullets-bullet-list '("■" "◆" "▲" "▶")
  24. org-capture-templates
  25. '(
  26. ("i" "Send to inbox" entry (file+headline "~/org/inbox.org" "Inbox")
  27. "* TODO %?\n")
  28. ("l" "Send to inbox with link" entry (file+headline "~/org/inbox.org" "Inbox")
  29. "* TODO %?\n %i\n %a")
  30. ("w" "Work diary entry" entry (file "~/org/work_diary.org")
  31. "* %u\n%?\n")
  32. ("n" "Add an idea" entry (file "~/org/ideas.org")
  33. "* %?\nEntered on %U\n"))
  34. org-agenda-include-diary nil
  35. org-agenda-custom-commands
  36. '(("h" todo "HOLD")
  37. ("d" "Agenda + Next Actions" ((agenda) (todo "NEXT"))))
  38. org-tag-alist '(("@home" . ?h)
  39. ("@townhall" . ?t)
  40. ("@farm" . ?f)
  41. ("@errand" . ?e)
  42. ("@read" . ?r)
  43. ("@next" . ?n)
  44. ("@computer" . ?c))
  45. org-modules '(org-drill
  46. org-id
  47. org-info
  48. org-habit
  49. org-protocol
  50. org-annotate-file
  51. org-eval
  52. org-expiry
  53. org-contacts
  54. org-man
  55. org-notmuch
  56. org-collector
  57. org-panel
  58. org-screen
  59. org-toc)
  60. ; refile targets
  61. org-refile-targets '(("~/org/todo.org" :maxlevel . 2)
  62. ("~/org/someday.org" :maxlevel . 2)
  63. ("~/org/town.org" :maxlevel . 2)
  64. ("~/org/personal.org" :maxlevel . 2)
  65. ("~/org/elation.org" :maxlevel . 2)))
  66. ;; org-match-sparse-tree
  67. ;; org-set-tags-command
  68. (defun +open-todo-file ()
  69. (interactive)
  70. "Opens the todo file"
  71. (find-file +todo-file))
  72. (map!
  73. :leader
  74. :desc "Open todo file" "O" #'+open-todo-file)
  75. (defun +show-agenda ()
  76. (interactive)
  77. (delete-other-windows)
  78. (with-popup-rules! nil
  79. (org-agenda-list)
  80. (calendar))
  81. (other-window 1)
  82. (split-window-vertically)
  83. (other-window 1)
  84. (find-file +todo-file))
  85. (map! :leader
  86. (:prefix "o"
  87. :desc "Org Agenda" "a" #'org-agenda-list
  88. :desc "Org open link" "l" #'org-open-at-point
  89. :desc "Org set tags" "t" #'org-set-tags-command
  90. :desc "Org Agenda and Notes" "A" #'+show-agenda))