Skip to content

Instantly share code, notes, and snippets.

@lislon
Created October 23, 2015 13:49
Show Gist options
  • Select an option

  • Save lislon/9bbe4b92608487e18d91 to your computer and use it in GitHub Desktop.

Select an option

Save lislon/9bbe4b92608487e18d91 to your computer and use it in GitHub Desktop.
;; Insert mode in capture mode
(add-hook 'org-capture-mode-hook 'evil-insert-state)
;; Insert mode when adding headers
(add-hook 'org-insert-heading-hook 'evil-insert-state)
;; (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")))
;; ))
(global-set-key "\C-cc" 'org-capture)
(custom-set-variables
'(org-agenda-files (quote ("~/todo.org")))
'(org-default-notes-file "~/notes.org")
'(org-agenda-ndays 7)
'(org-deadline-warning-days 14)
'(org-agenda-show-all-dates t)
'(org-agenda-skip-deadline-if-done t)
'(org-agenda-skip-scheduled-if-done t)
'(org-agenda-start-on-weekday nil)
'(org-reverse-note-order t)
'(org-fast-tag-selection-single-key (quote expert))
'(org-agenda-custom-commands
(quote (("d" todo "DELEGATED" nil)
("c" todo "DONE|DEFERRED|CANCELLED" nil)
("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) "\\=.*\\[#A\\]")))
(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) "\n]+>")))
(org-agenda-overriding-header "Unscheduled TODO entries: "))))))
)
(setq org-capture-templates (quote (("t" "todo" entry (file "~/todo.org")
"* TODO %?\n%u")
("n" "note" entry (file "~/notes.org")
"* %?")
)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment