X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fhelp.el;h=abe3bfc7799b51ee906fac371da2635073665da3;hb=39793541698ff438e823fc000c663122f34d6e05;hp=eb7b1b6c835e16f5e6fa3c6c27d482a31c5c7772;hpb=77dcef404dc78635f6ffa8f71a803d2bc7cc8921;p=chise%2Fxemacs-chise.git

diff --git a/lisp/help.el b/lisp/help.el
index eb7b1b6..abe3bfc 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -461,7 +461,9 @@ You should never set this directory, only let-bind it.")
   (if (and (integerp help-max-help-buffers)
            (> help-max-help-buffers 0)
            (stringp name))
-      (format "*%s: %s*" help-buffer-prefix-string name)
+      (if help-buffer-prefix-string
+	  (format "*%s: %s*" help-buffer-prefix-string name)
+	(format "*%s*" name))
     (format "*%s*" help-buffer-prefix-string)))
 
 ;; Use this function for displaying help when C-h something is pressed