1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
;;; Code:
(require 'org)
(defun org-custom-hook()
"Custom org mode hook."
(setq org-hide-emphasis-markers t)
(font-lock-add-keywords 'org-mode
'(("^ *\\([-]\\) "
(0 (prog1 () (compose-region (match-beginning 1) (match-end 1) "•"))))))
(let* ((variable-tuple
(cond ((x-list-fonts "Iosevka") '(:font "Iosevka"))
((x-list-fonts "Monaco") '(:font "Monaco"))
((x-list-fonts "Source Sans Pro") '(:font "Source Sans Pro"))))
(base-font-color (face-foreground 'default nil 'default))
(headline `(:inherit default :weight normal :foreground ,base-font-color)))
(custom-theme-set-faces
'user
`(org-level-8 ((t (,@headline ,@variable-tuple))))
`(org-level-7 ((t (,@headline ,@variable-tuple))))
`(org-level-6 ((t (,@headline ,@variable-tuple))))
`(org-level-5 ((t (,@headline ,@variable-tuple))))
`(org-level-4 ((t (,@headline ,@variable-tuple :height 1.0))))
`(org-level-3 ((t (,@headline ,@variable-tuple :height 1.1))))
`(org-level-2 ((t (,@headline ,@variable-tuple :height 1.3 :weight bold))))
`(org-level-1 ((t (,@headline ,@variable-tuple :height 1.5 :weight bold))))
`(org-document-title ((t (,@headline ,@variable-tuple :height 1.3 :weight:bold))))))
(custom-theme-set-faces
'user
'(org-block ((t (:inherit fixed-pitch))))
'(org-code ((t (:inherit (shadow fixed-pitch)))))
'(org-document-info ((t (:foreground "dark orange"))))
'(org-document-info-keyword ((t (:inherit (shadow fixed-pitch)))))
'(org-indent ((t (:inherit (org-hide fixed-pitch)))))
'(org-link ((t (:foreground "royal blue" :underline t))))
'(org-meta-line ((t (:inherit (font-lock-comment-face fixed-pitch)))))
'(org-property-value ((t (:inherit fixed-pitch))) t)
'(org-special-keyword ((t (:inherit (font-lock-comment-face fixed-pitch)))))
'(org-table ((t (:inherit fixed-pitch :foreground "#83a598"))))
'(org-tag ((t (:inherit (shadow fixed-pitch) :weight bold :height 0.8))))
'(org-verbatim ((t (:inherit (shadow fixed-pitch))))))
(variable-pitch-mode 1)
(use-package org-bullets
:config
(org-bullets-mode 1)
)
(org-indent-mode 1)
(visual-line-mode 1)
;; (setq org-blank-before-new-entry (quote ((heading . nil)
;; (plain-list-item . nil))))
(require 'flyspell)
(flyspell-mode 1)
)
(setq org-directory "~/OrgRoam")
(setq org-agenda-files '("~/OrgRoam" "~/OrgRoam/daily"))
;(setq org-agenda-files
; (find-lisp-find-files "~/OrgRoam" "\.org$"))
(setq org-todo-keywords
'((sequence "TODO" "PROGRESS" "VERIFY" "|" "DONE" "ABANDONED")))
(setq org-todo-keyword-faces
'(("TODO" . (:foreground "RED"))
("PROGRESS" . "royal blue")
("VERIFY" . "#E0A526")
("ABANDONED" . "light gray")
("DONE" . "dark green"))
)
(setq org-return-follows-link t)
(add-hook 'org-mode-hook 'org-custom-hook)
(use-package org-alert
:ensure t
:config
(org-alert-enable)
(setq org-alert-interval 300
org-alert-notify-cutoff 10
org-alert-notify-after-event-cutoff nil
alert-default-style 'libnotify))
(use-package org-roam
:ensure t
:custom
(org-roam-directory "~/OrgRoam")
:bind (("C-c n l" . org-roam-buffer-toggle)
("C-c n f" . org-roam-node-find)
("C-c n i" . org-roam-node-insert)
("C-c n g" . org-roam-graph)
("C-c n j" . org-roam-dailies-capture-today)
("C-c n t" . org-roam-tag-add)
("C-c n a" . org-roam-alias-add))
:config
(setq org-roam-node-display-template (concat "${title:*} " (propertize "${tags:10}" 'face 'org-tag)))
(org-roam-setup)
)
(provide 'org-custom)
;;; org-custom.el ends here
|
