diff options
Diffstat (limited to 'test/lisp/emacs-lisp/timer-tests.el')
| -rw-r--r-- | test/lisp/emacs-lisp/timer-tests.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/test/lisp/emacs-lisp/timer-tests.el b/test/lisp/emacs-lisp/timer-tests.el index bd2dcbe554e..676730ead2d 100644 --- a/test/lisp/emacs-lisp/timer-tests.el +++ b/test/lisp/emacs-lisp/timer-tests.el @@ -49,14 +49,14 @@ (let* ((tc (current-time)) (delta-ticks 1000) (hz 128000) - (tce (encode-time tc hz)) + (tce (time-convert tc hz)) (tc+delta (time-add tce (cons delta-ticks hz))) - (tc+deltae (encode-time tc+delta hz)) + (tc+deltae (time-convert tc+delta hz)) (tc+delta-ticks (car tc+deltae)) (tc-nexte (cons (- tc+delta-ticks (% tc+delta-ticks delta-ticks)) hz)) (nt (timer-next-integral-multiple-of-time tc (/ (float delta-ticks) hz))) - (nte (encode-time nt hz))) + (nte (time-convert nt hz))) (should (equal tc-nexte nte)))) (ert-deftest timer-next-integral-multiple-of-time-3 () |