+org.el 3.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102
  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-todo-keywords '((sequence "TODO(t)" "|" "DONE(d)"))
  36. org-agenda-include-diary nil
  37. org-agenda-custom-commands
  38. '(("h" todo "HOLD")
  39. ("d" "Agenda + Next Actions" ((agenda) (todo "NEXT"))))
  40. org-tag-alist '(("@home" . ?h)
  41. ("@townhall" . ?t)
  42. ("@farm" . ?f)
  43. ("@read" . ?r)
  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 Agenda and Notes" "A" #'+show-agenda))