diff options
| author | Karl Heuer <kwzh@gnu.org> | 1995-05-15 21:53:39 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1995-05-15 21:53:39 +0000 |
| commit | 76b17c0b664daf4f941ec3a4d45e7c3e92d3003d (patch) | |
| tree | eb763f93a024f89aa1c970cdd568535439c9fd25 /lisp/emacs-lisp | |
| parent | 81291a475d2e4a54c7bb9199811e3ddd5b267a6b (diff) | |
| download | emacs-76b17c0b664daf4f941ec3a4d45e7c3e92d3003d.tar.gz emacs-76b17c0b664daf4f941ec3a4d45e7c3e92d3003d.tar.bz2 emacs-76b17c0b664daf4f941ec3a4d45e7c3e92d3003d.zip | |
(tq-process-buffer): Don't hard-code the buffer name.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/tq.el | 2 |
1 files changed, 1 insertions, 1 deletions
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)))) |