diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-04-11 23:01:16 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-04-11 23:01:16 +0200 |
commit | d20fc4d7c5973e2c07feb321f959471d946aff57 (patch) | |
tree | 7d38a8ac24bb8657a5d3a5dba867bf65bc75539d | |
parent | b7a7dd1492af2853ead064e8b1cf3094216c2147 (diff) | |
download | org-mode-d20fc4d7c5973e2c07feb321f959471d946aff57.tar.gz |
org-capture: Properly handle `org-extend-today-until' in templates
* lisp/org-capture.el (org-capture-set-target-location): Handle
non-default `org-extend-today-until'.
Reported-by: Robert Irelan <rirelan@gmail.com>
<http://lists.gnu.org/r/emacs-orgmode/2018-04/msg00023.html>
-rw-r--r-- | lisp/org-capture.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-capture.el b/lisp/org-capture.el index 3de386c..37d1b3b 100644 --- a/lisp/org-capture.el +++ b/lisp/org-capture.el @@ -1010,7 +1010,7 @@ Store them in the capture property list." ;; Use 00:00 when no time is given for another ;; date than today? (apply #'encode-time - (append '(0 0 0) + (append `(0 0 ,org-extend-today-until) (cl-cdddr (decode-time prompt-time))))) ((string-match "\\([^ ]+\\)--?[^ ]+[ ]+\\(.*\\)" org-read-date-final-answer) |