blob: efb2e74602c47afe06dea4637bae914f0f3da252 (
about) (
plain)
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
|
(require 'org)
(global-set-key (kbd "C-c o l") 'org-store-link)
(global-set-key (kbd "C-c o a") 'org-agenda)
(global-set-key (kbd "C-c o s") 'org-schedule)
(global-set-key (kbd "C-c o c") 'org-capture)
(setq org-log-done t)
(setq org-return-follows-link t)
(setq org-startup-indented t)
(setq org-directory "~/org.local")
(setq org-agenda-files (mapcar (lambda (x) (concat org-directory x))
(list "/master.org"
"/work.org"
"/study.org"
"/home.org")))
(setq org-default-notes-file (concat org-directory "/notes.org"))
(setq org-agenda-custom-commands
'(("w" todo "WAITING" nil)
("n" todo "NEXT" nil)
("d" "Agenda + Next Actions" ((agenda) (todo "NEXT")))))
(defun my/modify-org-done-face ()
(setq org-fontify-done-headline t)
(set-face-attribute 'org-done nil :strike-through t)
(set-face-attribute 'org-headline-done nil
:strike-through t
:foreground "light gray"))
(eval-after-load "org"
(add-hook 'org-add-hook 'my/modify-org-done-face))
(defun gtd ()
(interactive)
(find-file (concat org-directory "/master.org")))
|