aboutsummaryrefslogtreecommitdiff
path: root/.emacs.d/rul-lisp/packages/rul-org.el
diff options
context:
space:
mode:
authorRaúl Benencia <id@rbenencia.name>2024-05-13 21:50:37 -0700
committerRaúl Benencia <id@rbenencia.name>2024-05-13 21:50:37 -0700
commit0fb9b4f1e1cefb836b3326164b6a98bf4a1e6c29 (patch)
treeeac40b335e8ab735bbd5ade27f7a57c4134717ad /.emacs.d/rul-lisp/packages/rul-org.el
parenta9aeb16b917547dff0b2edaa27be25223cb8437a (diff)
emacs: define org-capture-templates
Diffstat (limited to '.emacs.d/rul-lisp/packages/rul-org.el')
-rw-r--r--.emacs.d/rul-lisp/packages/rul-org.el30
1 files changed, 16 insertions, 14 deletions
diff --git a/.emacs.d/rul-lisp/packages/rul-org.el b/.emacs.d/rul-lisp/packages/rul-org.el
index 4081335..b4e17dc 100644
--- a/.emacs.d/rul-lisp/packages/rul-org.el
+++ b/.emacs.d/rul-lisp/packages/rul-org.el
@@ -65,32 +65,34 @@
(setq org-capture-templates
(quote
(
- ("w" "Todo" entry (file+headline org-refile-path "Tasks")
+
+ ("w" "Todo" entry
+ (file+headline org-refile-path "Tasks")
"* TODO "
:empty-lines 1)
+
("m"
"Capture incoming email"
entry
(file+headline org-refile-path "Incoming")
"* TODO Re: %:description\n\n Source: %u, %a\n"
:empty-lines 1)
- )))
-(add-hook 'org-capture-mode-hook 'delete-other-windows)
-(setq org-protocol-flag nil)
+ ("e" "Elfeed entry" entry
+ (file+headline org-refile-path "Read later")
+ "* %? [[%:link][%:description]]\n %U\n %:description\n")
-(defadvice org-capture-finalize (after delete-frame-at-end activate)
- "Delete frame at remember finalization"
- (progn (if org-protocol-flag (delete-frame))
- (setq org-protocol-flag nil)))
+ ("L" "Web Link" entry
+ (file+headline org-refile-path "Read later")
+ "* %?[[%:link][%:description]]\n %:initial\n")
-(defadvice org-capture-kill (after delete-frame-at-end activate)
- "Delete frame at remember abort"
- (progn (if org-protocol-flag (delete-frame))
- (setq org-protocol-flag nil)))
+ ("l" "Web Link with Selection" entry
+ (file+headline org-refile-path "Read later")
+ "* [[%:link][%:description]]%?\n %:initial\n")
-(defadvice org-protocol-capture (before set-org-protocol-flag activate)
- (setq org-protocol-flag t))
+ )))
+
+(add-hook 'org-capture-mode-hook 'delete-other-windows)
;; REFILE ;;
nihil fit ex nihilo