# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1037595405 0
# Node ID 2eb7a3846b4c72a3876f131bd5d264adb428d4e3
# Parent  243072643e17b7870cb6676742c6bc3c9d72c4cf
(finder-commentary): Use buffer *Finder-package*.

diff -r 243072643e17 -r 2eb7a3846b4c lisp/finder.el
--- a/lisp/finder.el	Mon Nov 18 04:56:00 2002 +0000
+++ b/lisp/finder.el	Mon Nov 18 04:56:45 2002 +0000
@@ -273,7 +273,9 @@
   (let* ((str (lm-commentary (find-library-name file))))
     (if (null str)
 	(error "Can't find any Commentary section"))
-    (pop-to-buffer "*Finder*")
+    ;; This used to use *Finder* but that would clobber the
+    ;; directory of categories.
+    (pop-to-buffer "*Finder-package*")
     (setq buffer-read-only nil)
     (erase-buffer)
     (insert str)