diff options
author | Bastien Guerry <bzg@altern.org> | 2013-03-30 19:03:09 +0100 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2013-03-30 19:03:09 +0100 |
commit | 2c41456b1df6774523bce2e723d3c117bc6b875f (patch) | |
tree | 4569da1ce34ef9a7275773198149dfb949b65b38 | |
parent | b802df337aaf5d7390d7f76e7ec7769ccf166b26 (diff) | |
download | org-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.el | 8 |
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)))) |