Fix false test failure
* testing/lisp/test-org.el (test-org/deadline-close-p): Fix false failures due to time-zone differences.
This commit is contained in:
parent
febab2fedb
commit
bff63cbeb3
|
@ -377,7 +377,9 @@
|
|||
"Test `org-deadline-close-p' specifications."
|
||||
;; Pretend that the current time is 2016-06-03 Fri 01:43
|
||||
(cl-letf (((symbol-function 'current-time)
|
||||
(lambda () '(22353 6425 905205 644000))))
|
||||
(lambda ()
|
||||
(apply #'encode-time
|
||||
(org-parse-time-string "2016-06-03 Fri 01:43")))))
|
||||
;; Timestamps are close if they are within `ndays' of lead time.
|
||||
(org-test-with-temp-text "* Heading"
|
||||
(should (org-deadline-close-p "2016-06-03 Fri" 0))
|
||||
|
|
Loading…
Reference in New Issue