***** Agenda settings
#+BEGIN_SRC emacs-lisp
(setq org-agenda-files (append '("~/org/")
- (file-expand-wildcards "~/projects/*/")
- (file-expand-wildcards "~/.emacs.d/config.org"))
+ (file-expand-wildcards "~/projects/*/")
+ (file-expand-wildcards "~/.emacs.d/config.org"))
org-refile-targets '((nil :maxlevel . 9)
(org-agenda-files :maxlevel . 9))
org-refile-use-outline-path 'file
("home" . ?h)
("office" . ?o)
("errand" . ?e)
+ ("vps" . ?v)
(:endgroup))
org-todo-keywords '((sequence "TODO(t)" "WAITING(w@)" "|" "DONE(d)" "BELAYED(b@)" "GIVEN(g@)")
(sequence "MEETING(m)" "|" "MET(M)"))
org-deadline-warning-days 30
org-agenda-window-setup 'current-window
org-agenda-time-grid '((daily today remove-match)
- (800 1000 1200 1400 1600 1800 2000)
- "------>"
- "---------------")
+ (800 900 1000 1100 1200 1300 1400 1500 1600 1700 1800 1900 2000)
+ " -----"
+ "")
org-agenda-scheduled-leaders '("Booked: " "Booked %dd. ago: ")
org-agenda-deadline-leaders '("Deadline: " "In %dd.: " "Died %dd. ago: ")
org-read-date-prefer-future 'time
(file+olp "gtd.org" "Inbox")
"* %^{Description}\n%U\n%?"
:prepend t)
- ("a" "Next Action" entry
+ ("n" "Next Action" entry
(file+olp "gtd.org" "Next")
"* TODO %^{Description}\n%U\n%?"
:prepend t)
(file "gtd.org")
"* %^{Description} :call:\n%U\n%?"
:prepend t)
- ("n" "Note" entry
+ ("t" "Note" entry
(file "notes.org")
"* %^{Description}\n%U\n%?"
:prepend t)))