# HG changeset patch # User Karl Heuer # Date 800574819 0 # Node ID e8214d59e98dfd812ad0b46c1bff1b8aaad44255 # Parent f9c9e52a7ef53ed0a49796f1f6d5f3c5a0549720 (tq-process-buffer): Don't hard-code the buffer name. diff -r f9c9e52a7ef5 -r e8214d59e98d lisp/emacs-lisp/tq.el --- a/lisp/emacs-lisp/tq.el Mon May 15 21:49:34 1995 +0000 +++ b/lisp/emacs-lisp/tq.el Mon May 15 21:53:39 1995 +0000 @@ -102,7 +102,7 @@ (pop-to-buffer buf nil) (error (concat "Spurious communication from process " (process-name (tq-process tq)) - ", see buffer *spurious*."))) + ", see buffer " (buffer-name buf) "."))) (goto-char (point-min)) (if (re-search-forward (tq-queue-head-regexp tq) nil t) (let ((answer (buffer-substring (point-min) (point))))