add org protocol

This commit is contained in:
petrucci4prez 2018-07-03 23:30:02 -04:00
parent d8e80d4ec2
commit facba469b6
2 changed files with 48 additions and 12 deletions

30
conf.el
View File

@ -290,7 +290,8 @@ event of an error or nonlocal exit."
(delight 'org-indent-mode)
(setq org-directory "~/Org")
(run-at-time "00:59" 3600 'org-save-all-org-buffers)
(setq org-modules '(org-habit))
(setq org-modules '(org-habit org-protocol))
(require 'org-protocol)
(setq org-log-into-drawer "LOGBOOK")
(setq org-log-done t)
@ -462,11 +463,28 @@ event of an error or nonlocal exit."
(let ((capfile "~/Org/capture.org"))
(setq org-capture-templates
`(("t" "todo" entry (file ,capfile) "* TODO %?\ndeliverable: \n%U\n")
("n" "note" entry (file ,capfile) "* %? :\\%note:\n%U\n" )
("a" "appointment" entry (file ,capfile) "* %?\n%U\n%^t\n" )
("m" "multi-day" entry (file ,capfile) "* TODO %?\n%U\n%^t--%^t\n" )
("d" "deadline" entry (file ,capfile) "* TODO %?\nDEADLINE: %^t\ndeliverable:\n%U\n" ))))
`(("t" "todo" entry (file ,capfile)
"* TODO %?\ndeliverable: \n%U\n")
("n" "note" entry (file ,capfile)
"* %? :\\%note:\n%U\n")
("a" "appointment" entry (file ,capfile)
"* %?\n%U\n%^t\n")
("m" "multi-day" entry (file ,capfile)
"* TODO %?\n%U\n%^t--%^t\n")
("d" "deadline" entry (file ,capfile)
"* TODO %?\nDEADLINE: %^t\ndeliverable:\n%U\n")
("p" "org-protocol" entry (file ,capfile)
"* %^{Title}\n%u\n#+BEGIN_QUOTE\n%i\n#+END_QUOTE"
:immediate-finish t)
("L" "org-protocol link" entry (file ,capfile)
"* %^{Title}\n[[%:link][%:description]]\n%U"
:immediate-finish t))))
(setq org-refile-targets (quote ((nil :maxlevel . 9)
("~/Org/reference/idea.org" :maxlevel . 9)

View File

@ -434,7 +434,8 @@ event of an error or nonlocal exit."
(delight 'org-indent-mode)
(setq org-directory "~/Org")
(run-at-time "00:59" 3600 'org-save-all-org-buffers)
(setq org-modules '(org-habit))
(setq org-modules '(org-habit org-protocol))
(require 'org-protocol)
#+END_SRC
** logging
#+BEGIN_SRC emacs-lisp
@ -662,11 +663,28 @@ There are several types of tags I use:
#+BEGIN_SRC emacs-lisp
(let ((capfile "~/Org/capture.org"))
(setq org-capture-templates
`(("t" "todo" entry (file ,capfile) "* TODO %?\ndeliverable: \n%U\n")
("n" "note" entry (file ,capfile) "* %? :\\%note:\n%U\n" )
("a" "appointment" entry (file ,capfile) "* %?\n%U\n%^t\n" )
("m" "multi-day" entry (file ,capfile) "* TODO %?\n%U\n%^t--%^t\n" )
("d" "deadline" entry (file ,capfile) "* TODO %?\nDEADLINE: %^t\ndeliverable:\n%U\n" ))))
`(("t" "todo" entry (file ,capfile)
"* TODO %?\ndeliverable: \n%U\n")
("n" "note" entry (file ,capfile)
"* %? :\\%note:\n%U\n")
("a" "appointment" entry (file ,capfile)
"* %?\n%U\n%^t\n")
("m" "multi-day" entry (file ,capfile)
"* TODO %?\n%U\n%^t--%^t\n")
("d" "deadline" entry (file ,capfile)
"* TODO %?\nDEADLINE: %^t\ndeliverable:\n%U\n")
("p" "org-protocol" entry (file ,capfile)
"* %^{Title}\n%u\n#+BEGIN_QUOTE\n%i\n#+END_QUOTE"
:immediate-finish t)
("L" "org-protocol link" entry (file ,capfile)
"* %^{Title}\n[[%:link][%:description]]\n%U"
:immediate-finish t))))
#+END_SRC
** refile
*** targets