(setq debug-on-error t debug-on-signal nil debug-on-quit nil) (add-to-list 'load-path (expand-file-name "~/build/org-mode/lisp")) (add-to-list 'load-path (expand-file-name "~/build/org-mode/contrib/lisp")) (require 'org-install) (require 'org-inlinetask) (setq org-agenda-files '("~/org") ;; log time for TODO state changes org-log-done 'time ;; log time on rescheduling org-log-reschedule 'time ;; log time on changing deadline org-log-redeadline 'time ;; To put notes inside LOGBOOK drawer org-log-into-drawer t ) (setq org-todo-keywords '((sequence "TODO(t)" "DLAY(l@/!)" "CONT(c!)" "|" "DONE(d@/!)" "CNCL(n@/!)") )) (setq org-todo-keyword-faces '(("CNCL" . (:background "snow3" :foreground "black" :weight bold)) )) (global-set-key (kbd "C-c a") 'org-agenda) (global-set-key (kbd "C-c l") 'org-store-link) (global-set-key (kbd "C-c C-l") 'org-insert-link-global) (global-set-key (kbd "C-c b") 'org-switchb)