From b32410669ed3325bd35fbd3753924a9ac7e6cac4 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 17 Jun 1997 21:51:35 +0000 Subject: [PATCH] (finder-list-keywords): Create *Finder* buffer if nec. --- lisp/finder.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/finder.el b/lisp/finder.el index 799a681418c..13cedc683a5 100644 --- a/lisp/finder.el +++ b/lisp/finder.el @@ -174,7 +174,7 @@ arguments compiles from `load-path'." (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) -- 2.39.5