Make non linked appear before linked options for org capture templates

This commit is contained in:
Ivan Malison 2015-04-08 15:10:44 -07:00
parent 0549274d17
commit 4ebdc5851b

View File

@ -839,27 +839,27 @@ the same tree node, and the headline of the tree node in the Org-mode file."
`(,org-gtd-file ,org-habits-file ,@(org-projectile:todo-files) `(,org-gtd-file ,org-habits-file ,@(org-projectile:todo-files)
,org-calendar-file)))) ,org-calendar-file))))
(add-to-list 'org-capture-templates
`("g" "GTD Todo" entry (file ,org-gtd-file)
(function org-capture-make-todo-template)))
(add-to-list 'org-capture-templates (add-to-list 'org-capture-templates
`("t" "GTD Todo (Linked)" entry (file ,org-gtd-file) `("t" "GTD Todo (Linked)" entry (file ,org-gtd-file)
(function org-capture-make-linked-todo-template))) (function org-capture-make-linked-todo-template)))
(add-to-list 'org-capture-templates (add-to-list 'org-capture-templates
`("c" "Calendar entry" entry `("g" "GTD Todo" entry (file ,org-gtd-file)
(function org-capture-make-todo-template)))
(add-to-list 'org-capture-templates
`("y" "Calendar entry (Linked)" entry
(file ,org-calendar-file) (file ,org-calendar-file)
"* %? "* %? %A
:PROPERTIES: :PROPERTIES:
:CREATED: %U :CREATED: %U
:END: :END:
%^T")) %^T"))
(add-to-list 'org-capture-templates (add-to-list 'org-capture-templates
`("y" "Calendar entry (Linked)" entry `("c" "Calendar entry" entry
(file ,org-calendar-file) (file ,org-calendar-file)
"* %? %A "* %?
:PROPERTIES: :PROPERTIES:
:CREATED: %U :CREATED: %U
:END: :END:
@ -874,9 +874,9 @@ the same tree node, and the headline of the tree node in the Org-mode file."
:STYLE: habit :STYLE: habit
:END:")) :END:"))
(add-to-list 'org-capture-templates (org-projectile:project-todo-entry "p"))
(add-to-list 'org-capture-templates (add-to-list 'org-capture-templates
(org-projectile:project-todo-entry "l" "* TODO %? %a\n" "Linked Project TODO")) (org-projectile:project-todo-entry "l" "* TODO %? %a\n" "Linked Project TODO"))
(add-to-list 'org-capture-templates (org-projectile:project-todo-entry "p"))
(let ((this-week-high-priority (let ((this-week-high-priority
;; The < in the following line works has behavior that is opposite ;; The < in the following line works has behavior that is opposite