emacs-27 363d927 2/2: Fix bug with JIT stealth timers

[Paul Eggert]

branch: emacs-27
commit 363d927086dbdc4e5073393889b76eb0470785f4
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    Fix bug with JIT stealth timers
    
    * lisp/emacs-lisp/timer.el (run-at-time): Don’t assume that Lisp
    time values must be conses (Bug#39944).
---
 lisp/emacs-lisp/timer.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/timer.el b/lisp/emacs-lisp/timer.el
index 74a9495..9eb8fee 100644
--- a/lisp/emacs-lisp/timer.el
+++ b/lisp/emacs-lisp/timer.el
@@ -378,7 +378,7 @@ This function returns a timer object which you can use in
                                  (decoded-time-year now)
                                  (decoded-time-zone now)))))))
 
-  (or (consp time)
+  (or (time-equal-p time time)
       (error "Invalid time format"))
 
   (let ((timer (timer-create)))