Mercurial > emacs

diff lisp/finder.el @ 18284:21a40db838e2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(finder-list-keywords): Create *Finder* buffer if nec.
author Richard M. Stallman <rms@gnu.org>
date Tue, 17 Jun 1997 21:51:35 +0000
parents 37ff8dfff53b
children 3854a35dffd8
line wrap: on
line diff
--- a/lisp/finder.el	Tue Jun 17 21:47:30 1997 +0000
+++ b/lisp/finder.el	Tue Jun 17 21:51:35 1997 +0000
@@ -174,7 +174,7 @@
   (interactive)
   (if (get-buffer "*Finder*")
       (pop-to-buffer "*Finder*")
-    (pop-to-buffer (set-buffer "*Finder*"))
+    (pop-to-buffer (set-buffer (get-buffer-create "*Finder*")))
     (finder-mode)
     (setq buffer-read-only nil)
     (erase-buffer)