procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Finish installing previous change.

Browse source
This commit is contained in:
Richard M. Stallman 1994-10-21 20:29:30 +00:00
parent 63afb1f896
commit c3207e5d72
1 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/timer.el
View file

@ -142,7 +142,15 @@ will happen at the specified time."
token (assoc (substring token (match-beginning 3) (match-end 3))
timer-alist)
timer-alist (delq token timer-alist))
(error "%s for %s; couldn't set at `%s'" error (nth 2 token) do))))
(or timer-alist
timer-dont-exit
(process-send-eof proc))
;; Update error message for this particular instance
(put 'timer-filter-error
'error-message
(format "%s for %s; couldn't set at \"%s\""
error (nth 2 token) do))
(signal 'timer-filter-error (list proc str)))))
(or timer-alist timer-dont-exit (process-send-eof proc))))
(defun timer-process-sentinel (proc str)