Does it happen only to me? The run-at-time function works
randomly for both 21.4 and 21.5 (built on Solaris and Linux).
Here's a test program which shows the actual lapsed time:
(defun test-timer (second)
(interactive "nSecond: ")
(let ((start (current-time)))
(let ((end (current-time)))
(message "Lapsed: %f"
(+ (* (- (car end) (car start)) 65536)
(- (nth 1 end) (nth 1 start))
(/ (- (nth 2 end) (nth 2 start)) 1000000.0)))))
It ends more quickly than the specified time in almost cases.
This is an exception although it is good that XEmacs works
Katsumi Yamaoka <yamaoka(a)jpl.org>