# HG changeset patch # User Karl Heuer # Date 861045771 0 # Node ID e614abd1ff44d19b96c6cf29818807aa43258cfb # Parent b386f1a9ed751336d5270ce4862769a3cf2c281d (timer-until): Fix syntax error. diff -r b386f1a9ed75 -r e614abd1ff44 lisp/timer.el --- a/lisp/timer.el Mon Apr 14 19:15:42 1997 +0000 +++ b/lisp/timer.el Mon Apr 14 19:22:51 1997 +0000 @@ -254,7 +254,7 @@ (defun timer-until (timer time) "Calculate number of seconds from when TIMER will run, until TIME. TIMER is a timer, and stands for the time when its next repeat is scheduled. -TIME is a time-list. +TIME is a time-list." (let ((high (- (car time) (aref timer 1))) (low (- (nth 1 time) (aref timer 2)))) (+ low (* high 65536))))