tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org-capture.el (org-capture-set-target-location): Don't throw an error when `org-time-was-given' is not bound 

* org-capture.el (org-capture-set-target-location): Don't
throw an error when `org-time-was-given' is not bound.

Thanks to Eric S Fraga for reporting this.
This commit is contained in:
Bastien Guerry 2013-06-27 15:35:22 +02:00
parent d7f9f9da56
commit eff77aa85e
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/org-capture.el
View File

@ -909,7 +909,8 @@ Store them in the capture property list."
(current-time))))
(org-capture-put
:default-time
(cond ((and (not org-time-was-given)
(cond ((and (or (not (boundp 'org-time-was-given))
(not org-time-was-given))
(not (= (time-to-days prompt-time) (org-today))))
;; Use 00:00 when no time is given for another date than today?
(apply 'encode-time (append '(0 0 0) (cdddr (decode-time prompt-time)))))