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)) |