diff options
Diffstat (limited to '.emacs.d/jd/jd-org.el')
| -rwxr-xr-x | .emacs.d/jd/jd-org.el | 41 |
1 files changed, 16 insertions, 25 deletions
diff --git a/.emacs.d/jd/jd-org.el b/.emacs.d/jd/jd-org.el index cd05d72..fe273c3 100755 --- a/.emacs.d/jd/jd-org.el +++ b/.emacs.d/jd/jd-org.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | 5 | ||
| 6 | (defvar jd/org-home "~/Documents/Org") | 6 | (defvar jd/org-home "~/Documents/Org") |
| 7 | (defvar jd/org-roam-home (concat jd/org-home "/roam")) | 7 | (defvar jd/org-roam-home (concat jd/org-home "/roam")) |
| 8 | (defvar jd/org-roam-daily-home (concat jd/org-home "/roam/daily")) | 8 | (defvar jd/org-roam-daily-home (concat jd/org-roam-home "/daily")) |
| 9 | 9 | ||
| 10 | (defun jd/org-mode-init () | 10 | (defun jd/org-mode-init () |
| 11 | (org-indent-mode) | 11 | (org-indent-mode) |
| @@ -20,12 +20,16 @@ | |||
| 20 | :pin org | 20 | :pin org |
| 21 | :commands (org-capture org-agenda) | 21 | :commands (org-capture org-agenda) |
| 22 | :hook (org-mode . jd/org-mode-init) | 22 | :hook (org-mode . jd/org-mode-init) |
| 23 | :bind | ||
| 24 | ("C-c o c" . #'org-capture) | ||
| 25 | ("C-c o p" . #'org-mobile-pull) | ||
| 26 | ("C-c o P" . #'org-mobile-push) | ||
| 27 | ("C-c o a" . #'org-agenda) | ||
| 23 | :config | 28 | :config |
| 24 | (setq org-directory (file-truename "~/Documents/Org/")) | 29 | (setq org-directory (file-truename "~/Documents/Org/")) |
| 25 | (setq org-mobile-inbox-for-pull (concat org-directory "flagged.org")) | 30 | (setq org-mobile-inbox-for-pull (concat org-directory "flagged.org")) |
| 26 | (setq org-mobile-directory "~/Dropbox/Apps/MobileOrg") | 31 | (setq org-mobile-directory "~/Documents/Org/Mobile/") |
| 27 | (setq org-agenda-files | 32 | (setq org-agenda-files '("Tasks.org" "Inbox.org" "Habits.org")) |
| 28 | '("Tasks.org")) | ||
| 29 | (setq org-ellipsis " ▾") | 33 | (setq org-ellipsis " ▾") |
| 30 | (setq org-agenda-start-with-log-mode t) | 34 | (setq org-agenda-start-with-log-mode t) |
| 31 | (setq org-log-done 'time) | 35 | (setq org-log-done 'time) |
| @@ -50,12 +54,14 @@ | |||
| 50 | "pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f")) | 54 | "pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f")) |
| 51 | (require 'org-tempo) | 55 | (require 'org-tempo) |
| 52 | 56 | ||
| 57 | |||
| 53 | (jd/leader-key-def | 58 | (jd/leader-key-def |
| 54 | "o" '(:ignore t :which-key "Open/Org") | 59 | "o" '(:ignore t :which-key "Open/Org") |
| 55 | "oc" '(org-capture :which-key "Open org-capture") | 60 | "oc" '(org-capture :which-key "Open org-capture") |
| 56 | "oop" '(org-mobile-pull :which-key "Org mobile pull") | 61 | "oop" '(org-mobile-pull :which-key "Org mobile pull") |
| 57 | "ooP" '(org-mobile-push :which-key "Org mobile push") | 62 | "ooP" '(org-mobile-push :which-key "Org mobile push") |
| 58 | "oa" '(org-agenda :which-key "Open org-agenda")) | 63 | "oa" '(org-agenda :which-key "Open org-agenda")) |
| 64 | |||
| 59 | 65 | ||
| 60 | (defun jd/org-font-setup () | 66 | (defun jd/org-font-setup () |
| 61 | ;; Replace list hyphen with dot | 67 | ;; Replace list hyphen with dot |
| @@ -122,21 +128,7 @@ | |||
| 122 | (org-babel-tangle)))) | 128 | (org-babel-tangle)))) |
| 123 | 129 | ||
| 124 | (add-hook 'org-mode-hook (lambda () (add-hook 'after-save-hook #'jd/org-babel-tangle-config))) | 130 | (add-hook 'org-mode-hook (lambda () (add-hook 'after-save-hook #'jd/org-babel-tangle-config))) |
| 125 | 131 | ) | |
| 126 | (defun jd/org-mode-visual-fill () | ||
| 127 | (setq visual-fill-column-width 100 | ||
| 128 | visual-fill-column-center-text t) | ||
| 129 | (visual-fill-column-mode 1))) | ||
| 130 | |||
| 131 | ;; (jd/use-package evil-org "emacs-evil-org" | ||
| 132 | ;; :after org | ||
| 133 | ;; :hook (org-mode . (lambda () evil-org-mode)) | ||
| 134 | ;; :config | ||
| 135 | ;; (require 'evil-org-agenda) | ||
| 136 | ;; (evil-org-agenda-set-keys)) | ||
| 137 | |||
| 138 | (jd/use-package visual-fill-column "emacs-visual-fill-column" | ||
| 139 | :hook (org-mode . jd/org-mode-visual-fill)) | ||
| 140 | 132 | ||
| 141 | (jd/use-package org-superstar "emacs-org-superstar" | 133 | (jd/use-package org-superstar "emacs-org-superstar" |
| 142 | :hook (org-mode . org-superstar-mode) | 134 | :hook (org-mode . org-superstar-mode) |
| @@ -145,7 +137,6 @@ | |||
| 145 | (setq org-superstar-remove-leading-stars t) | 137 | (setq org-superstar-remove-leading-stars t) |
| 146 | (setq org-superstar-headline-bullets-list '("◉" "○" "●" "○" "●" "○" "●"))) | 138 | (setq org-superstar-headline-bullets-list '("◉" "○" "●" "○" "●" "○" "●"))) |
| 147 | 139 | ||
| 148 | ; (jd/add-package-to-manifest "emacs-emacsql-sqlite3") | ||
| 149 | (jd/use-package org-roam "emacs-org-roam" | 140 | (jd/use-package org-roam "emacs-org-roam" |
| 150 | :custom | 141 | :custom |
| 151 | (org-roam-directory (file-truename jd/org-roam-home)) | 142 | (org-roam-directory (file-truename jd/org-roam-home)) |
