Pārlūkot izejas kodu

Merge branch 'maint'

Nicolas Goaziou 7 gadi atpakaļ
vecāks
revīzija
163c84f2ee
1 mainītis faili ar 1 papildinājumiem un 2 dzēšanām
  1. 1 2
      lisp/org-clock.el

+ 1 - 2
lisp/org-clock.el

@@ -2703,8 +2703,7 @@ LEVEL is an integer.  Indent by two spaces per level above 1."
       (pcase-let ((`(,month ,day ,year) (calendar-gregorian-from-absolute ts)))
 	(setq ts (float-time (encode-time 0 0 0 day month year)))))
      (ts
-      (setq ts (float-time
-		(apply #'encode-time (org-parse-time-string ts nil t))))))
+      (setq ts (float-time (apply #'encode-time (org-parse-time-string ts))))))
     (cond
      ((numberp te)
       ;; Likewise for te.