(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 gtd () (interactive) (find-file (concat org-directory "/master.org")))