+org.el 3.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104
  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. '(("i" "Send to inbox" entry (file+headline "~/org/inbox.org" "Inbox")
  26. "* TODO %?\n %i\n %a")
  27. ("n" "Create new note" entry (file "~/org/notes.org")
  28. "* %?\nEntered on %U\n %i\n %a")
  29. ("e" "Elation related note" entry (file "~/org/elation.org")
  30. "* %?\nEntered on %U\n %i\n %a")
  31. ("g" "Add glossary note" entry (file "~/org/glossary.org")
  32. "* %?\nEntered on %U\n %i\n")
  33. ("d" "Add an idea" entry (file "~/org/ideas.org")
  34. "* %?\nEntered on %U\n %i\n"))
  35. org-agenda-include-diary nil
  36. org-agenda-custom-commands
  37. '(("h" todo "HOLD")
  38. ("d" "Agenda + Next Actions" ((agenda) (todo "NEXT"))))
  39. org-tag-alist '(("@home" . ?h)
  40. ("@townhall" . ?t)
  41. ("@farm" . ?f)
  42. ("@errand" . ?e)
  43. ("@read" . ?r)
  44. ("@next" . ?n)
  45. ("@computer" . ?c))
  46. org-modules '(org-drill
  47. org-id
  48. org-info
  49. org-habit
  50. org-protocol
  51. org-annotate-file
  52. org-eval
  53. org-expiry
  54. org-contacts
  55. org-man
  56. org-notmuch
  57. org-collector
  58. org-panel
  59. org-screen
  60. org-toc)
  61. ; refile targets
  62. org-refile-targets '(("~/org/todo.org" :maxlevel . 2)
  63. ("~/org/someday.org" :maxlevel . 2)
  64. ("~/org/town.org" :maxlevel . 2)
  65. ("~/org/personal.org" :maxlevel . 2)
  66. ("~/org/elation.org" :maxlevel . 2)))
  67. ;; org-match-sparse-tree
  68. ;; org-set-tags-command
  69. (defun +open-todo-file ()
  70. (interactive)
  71. "Opens the todo file"
  72. (find-file +todo-file))
  73. (map!
  74. :leader
  75. :desc "Open todo file" "O" #'+open-todo-file)
  76. (defun +show-agenda ()
  77. (interactive)
  78. (delete-other-windows)
  79. (with-popup-rules! nil
  80. (org-agenda-list)
  81. (calendar))
  82. (other-window 1)
  83. (split-window-vertically)
  84. (other-window 1)
  85. (find-file +todo-file))
  86. (map! :leader
  87. (:prefix "o"
  88. :desc "Org Agenda" "a" #'org-agenda-list
  89. :desc "Org open link" "l" #'org-open-at-point
  90. :desc "Org set tags" "t" #'org-set-tags-command
  91. :desc "Org Agenda and Notes" "A" #'+show-agenda))