From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 9 Jul 1997 01:24:54 +0000 (+0000)
Subject: (finder-list-matches): Create *Finder Category* buffer.
X-Git-Tag: emacs-20.1~1259
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2d7b0db76efd9f7921f29e242aed02730ca4878c;p=emacs.git

(finder-list-matches): Create *Finder Category* buffer.
---

diff --git a/lisp/finder.el b/lisp/finder.el
index 13cedc683a5..915d88f34b9 100644
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -193,7 +193,7 @@ arguments compiles from `load-path'."
     (finder-summary)))
 
 (defun finder-list-matches (key)
-  (pop-to-buffer (set-buffer "*Finder Category*"))
+  (pop-to-buffer (set-buffer (get-buffer-create "*Finder Category*")))
   (finder-mode)
   (setq buffer-read-only nil)
   (erase-buffer)