From: Paul Eggert <eggert@cs.ucla.edu>
Date: Tue, 27 Mar 2018 20:48:13 +0000 (-0700)
Subject: Avoid using unportable integer in org-clock
X-Git-Tag: emacs-27.0.90~5382
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c8e8d16810ec09139c560c77572d3372a2edd8d2;p=emacs.git

Avoid using unportable integer in org-clock

* lisp/org/org-clock.el (org-clock--oldest-date): Avoid use of an
integer outside portable Emacs range.  Go back to using a simple
check, since decode-time should no longer infloop.
---

diff --git a/lisp/org/org-clock.el b/lisp/org/org-clock.el
index 4c5fcc64b0f..c124abd3918 100644
--- a/lisp/org/org-clock.el
+++ b/lisp/org/org-clock.el
@@ -478,17 +478,7 @@ to add an effort property.")
 	  (funcall dichotomy
 		   most-negative-fixnum
 		   0
-		   (lambda (m)
-                     ;; libc in macOS 10.6 hangs when decoding times
-                     ;; around year -2**31.  Limit `high' not to go
-                     ;; any earlier than that.
-                     (unless (and (eq system-type 'darwin)
-                                  (string-match-p
-                                   "10\\.6\\.[[:digit:]]"
-                                   (shell-command-to-string
-                                    "sw_vers -productVersion"))
-                                  (<= m -1034058203135))
-                       (ignore-errors (decode-time (list m 0)))))))
+		   (lambda (m) (ignore-errors (decode-time (list m 0))))))
 	 (low
 	  (funcall dichotomy
 		   most-negative-fixnum