From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 15 May 1995 21:53:39 +0000 (+0000)
Subject: (tq-process-buffer): Don't hard-code the buffer name.
X-Git-Tag: emacs-19.34~4043
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=76b17c0b664daf4f941ec3a4d45e7c3e92d3003d;p=emacs.git

(tq-process-buffer): Don't hard-code the buffer name.
---

diff --git a/lisp/emacs-lisp/tq.el b/lisp/emacs-lisp/tq.el
index 043d057a744..5dc77a36f6c 100644
--- a/lisp/emacs-lisp/tq.el
+++ b/lisp/emacs-lisp/tq.el
@@ -102,7 +102,7 @@ that's how we tell where the answer ends."
 	  (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))))