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.
This commit is contained in:
Paul Eggert 2018-03-27 13:48:13 -07:00
parent 72fad885b6
commit c8e8d16810

View file

@ -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