Mercurial > emacs

changeset 9642:d857ac857c27

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Finish installing previous change.
author Richard M. Stallman <rms@gnu.org>
date Fri, 21 Oct 1994 20:29:30 +0000
parents 284c46319091
children 5d1e70b22a93
files lisp/=timer.el
diffstat 1 files changed, 9 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/=timer.el	Fri Oct 21 20:27:08 1994 +0000
+++ b/lisp/=timer.el	Fri Oct 21 20:29:30 1994 +0000
@@ -142,7 +142,15 @@
               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)