浏览代码

Merge branch 'maint'

Nicolas Goaziou 7 年之前
父节点
当前提交
6b9f9e9aff
共有 2 个文件被更改,包括 4 次插入5 次删除
  1. 3 3
      doc/org.texi
  2. 1 2
      lisp/org-clock.el

+ 3 - 3
doc/org.texi

@@ -501,9 +501,9 @@ Capture templates
 
 Protocols for external access
 
-* @code{store-link} protocol::  Store a link, push URL to kill-ring
-* @code{capture} protocol::     Fill a buffer with external information
-* @code{open-source} protocol::  Edit published contents
+* @code{store-link} protocol::  Store a link, push URL to kill-ring.
+* @code{capture} protocol::     Fill a buffer with external information.
+* @code{open-source} protocol::  Edit published contents.
 
 Archiving
 

+ 1 - 2
lisp/org-clock.el

@@ -2710,8 +2710,7 @@ LEVEL is an integer.  Indent by two spaces per level above 1."
       (pcase-let ((`(,month ,day ,year) (calendar-gregorian-from-absolute te)))
 	(setq te (float-time (encode-time 0 0 0 day month year)))))
      (te
-      (setq te (float-time
-		(apply #'encode-time (org-parse-time-string te nil t))))))
+      (setq te (float-time (apply #'encode-time (org-parse-time-string te))))))
     (setq tsb
 	  (if (eq step0 'week)
 	      (- ts (* 86400 (- (nth 6 (decode-time (seconds-to-time ts))) ws)))