summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2013-03-30 19:03:09 +0100
committerBastien Guerry <bzg@altern.org>2013-03-30 19:03:09 +0100
commit2c41456b1df6774523bce2e723d3c117bc6b875f (patch)
tree4569da1ce34ef9a7275773198149dfb949b65b38
parentb802df337aaf5d7390d7f76e7ec7769ccf166b26 (diff)
downloadorg-mode-2c41456b1df6774523bce2e723d3c117bc6b875f.tar.gz
org-capture.el (org-capture-import-remember-templates): Take care of adding :jump-to-captured option if needed
* org-capture.el (org-capture-import-remember-templates): Take care of adding :jump-to-captured option if needed.
-rw-r--r--lisp/org-capture.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/org-capture.el b/lisp/org-capture.el
index 1962caa..d8e62a1 100644
--- a/lisp/org-capture.el
+++ b/lisp/org-capture.el
@@ -1786,7 +1786,7 @@ Such keywords are prefixed with \"%:\". See
(position (or (nth 4 entry) org-remember-default-headline))
(type 'entry)
(prepend org-reverse-note-order)
- immediate target)
+ immediate target jump-to-captured)
(cond
((member position '(top bottom))
(setq target (list 'file file)
@@ -1800,9 +1800,13 @@ Such keywords are prefixed with \"%:\". See
(setq template (replace-match "" t t template)
immediate t))
+ (when (string-match "%&" template)
+ (setq jump-to-captured t))
+
(append (list key desc type target template)
(if prepend '(:prepend t))
- (if immediate '(:immediate-finish t)))))
+ (if immediate '(:immediate-finish t))
+ (if jump-to-captured '(:jump-to-captured t)))))
org-remember-templates))))