diff options
Diffstat (limited to 'emacs/.emacs.d/org-mode.el')
-rw-r--r-- | emacs/.emacs.d/org-mode.el | 76 |
1 files changed, 0 insertions, 76 deletions
diff --git a/emacs/.emacs.d/org-mode.el b/emacs/.emacs.d/org-mode.el deleted file mode 100644 index 1828b38..0000000 --- a/emacs/.emacs.d/org-mode.el +++ /dev/null @@ -1,76 +0,0 @@ -(require 'org-install) - -; initialize these to empty lists so config files we reference can use 'add-to-list', -; rather than replacing the whole list and possibly trampling on another config file. -(setq org-agenda-files ()) -(setq org-capture-templates ()) -(setq org-tag-faces ()) - -(load-user-file "org-mode.local.el") - -(add-to-list 'auto-mode-alist '("\\.org$" . org-mode)) -(add-to-list 'auto-mode-alist `(,(expand-file-name "~/org/") . org-mode)) - -(define-key mode-specific-map [?a] 'org-agenda) - -(eval-after-load "org" - '(progn - (define-prefix-command 'org-todo-state-map) - - (define-key org-mode-map "\C-cx" 'org-todo-state-map) - - (define-key org-todo-state-map "x" #'(lambda nil (interactive) (org-todo "CANCELLED"))) - (define-key org-todo-state-map "d" #'(lambda nil (interactive) (org-todo "DONE"))) - (define-key org-todo-state-map "f" #'(lambda nil (interactive) (org-todo "DEFERRED"))) - (define-key org-todo-state-map "l" #'(lambda nil (interactive) (org-todo "DELEGATED"))) - (define-key org-todo-state-map "s" #'(lambda nil (interactive) (org-todo "STARTED"))) - (define-key org-todo-state-map "w" #'(lambda nil (interactive) (org-todo "WAITING"))))) - -(define-key global-map "\C-cc" 'org-capture) - -(custom-set-variables - '(org-agenda-custom-commands - '(("h" "Home agenda" - ((agenda "") - (alltodo "" - ((org-agenda-skip-function '(org-agenda-skip-if nil '(scheduled deadline))) - (org-agenda-overriding-header "Eventual TODO items:")))) - ((org-agenda-tag-filter-preset '("+home")))) - ("j" "Work agenda" - ((agenda "") - (alltodo "" - ((org-agenda-skip-function '(org-agenda-skip-if nil '(scheduled deadline))) - (org-agenda-overriding-header "Eventual TODO items:")))) - ((org-agenda-tag-filter-preset '("-home")))) - ("w" todo "WAITING" nil) - ("W" agenda "" ((org-agenda-ndays 21))) - ("A" agenda "" - ((org-agenda-skip-function - (lambda nil - (org-agenda-skip-entry-if - (quote notregexp) - "\\=.*\\[#!\\]"))) - (org-agenda-ndays 1) - (org-agenda-overriding-header "Today's Priority #A tasks: "))) - ("u" alltodo "" - ((org-agenda-skip-function - (lambda nil - (org-agenda-skip-entry-if - (quote scheduled) - (quote deadline) - (quote regexp) - " -]+>")) - (org-agenda-overriding-header "Unscheduled TODO entries: ")))))) - '(org-agenda-dim-blocked-tasks 'invisible) - '(org-agenda-ndays 14) - '(org-agenda-show-all-dates t) - '(org-agenda-skip-deadline-if-done t) - '(org-agenda-skip-deadline-prewarning-if-scheduled t) - '(org-agenda-skip-scheduled-if-done t) - '(org-agenda-start-on-weekday nil) - '(org-deadline-warning-days 14) - '(org-enforce-todo-dependencies t) - '(org-fast-tag-selection-single-key (quote expert)) - '(org-return-follows-link t) - '(org-reverse-note-order t)) |