diff options
author | Bastien Guerry <bzg@altern.org> | 2013-06-27 15:35:22 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2013-06-27 15:35:22 +0200 |
commit | eff77aa85ea2e812ddc549ba88738d102ef875f6 (patch) | |
tree | 20328de0f31c8b369ea88860cae21b1cca366b2c | |
parent | d7f9f9da569662cf52d99aba271ac47ddabbaa10 (diff) | |
download | org-mode-eff77aa85ea2e812ddc549ba88738d102ef875f6.tar.gz |
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.
-rw-r--r-- | lisp/org-capture.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/org-capture.el b/lisp/org-capture.el index 936883a..a4f0fd0 100644 --- a/lisp/org-capture.el +++ b/lisp/org-capture.el @@ -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))))) |