* org-capture.el: Use org-today.
Signed-off-by: Julien Danjou <jul...@danjou.info>
---
lisp/org-capture.el | 9 ++-------
1 files changed, 2 insertions(+), 7 deletions(-)
diff --git a/lisp/org-capture.el b/lisp/org-capture.el
index a5c6a4d..7d0f1ac 100644
--- a/lisp/org-capture.el
+++ b/lisp/org-capture.el
@@ -671,15 +671,10 @@ already gone."
;; prompt for date
(time-to-days (org-read-date
nil t nil "Date for tree entry:"
- (time-subtract (current-time)
- (list 0 (* 3600
- org-extend-today-until)
- 0)))))
+ (days-to-time (org-today)))))
(t
;; current date, possible corrected for late night workers
- (time-to-days
- (time-subtract (current-time)
- (list 0 (* 3600 org-extend-today-until) 0))))))))
+ (org-today))))))
((eq (car target) 'file+function)
(set-buffer (org-capture-target-buffer (nth 1 target)))
--
1.7.2.3
_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
