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) (delight 'org-indent-mode)
(setq org-directory "~/Org") (setq org-directory "~/Org")
(run-at-time "00:59" 3600 'org-save-all-org-buffers) (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-into-drawer "LOGBOOK")
(setq org-log-done t) (setq org-log-done t)
@ -462,11 +463,28 @@ event of an error or nonlocal exit."
(let ((capfile "~/Org/capture.org")) (let ((capfile "~/Org/capture.org"))
(setq org-capture-templates (setq org-capture-templates
`(("t" "todo" entry (file ,capfile) "* TODO %?\ndeliverable: \n%U\n") `(("t" "todo" entry (file ,capfile)
("n" "note" entry (file ,capfile) "* %? :\\%note:\n%U\n" ) "* TODO %?\ndeliverable: \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" ) ("n" "note" entry (file ,capfile)
("d" "deadline" entry (file ,capfile) "* TODO %?\nDEADLINE: %^t\ndeliverable:\n%U\n" )))) "* %? :\\%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) (setq org-refile-targets (quote ((nil :maxlevel . 9)
("~/Org/reference/idea.org" :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) (delight 'org-indent-mode)
(setq org-directory "~/Org") (setq org-directory "~/Org")
(run-at-time "00:59" 3600 'org-save-all-org-buffers) (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 #+END_SRC
** logging ** logging
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
@ -662,11 +663,28 @@ There are several types of tags I use:
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(let ((capfile "~/Org/capture.org")) (let ((capfile "~/Org/capture.org"))
(setq org-capture-templates (setq org-capture-templates
`(("t" "todo" entry (file ,capfile) "* TODO %?\ndeliverable: \n%U\n") `(("t" "todo" entry (file ,capfile)
("n" "note" entry (file ,capfile) "* %? :\\%note:\n%U\n" ) "* TODO %?\ndeliverable: \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" ) ("n" "note" entry (file ,capfile)
("d" "deadline" entry (file ,capfile) "* TODO %?\nDEADLINE: %^t\ndeliverable:\n%U\n" )))) "* %? :\\%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 #+END_SRC
** refile ** refile
*** targets *** targets