From xemacs-m  Thu Sep 18 08:37:36 1997
Received: from greatwall.npac.syr.edu (greatwall.npac.syr.edu [128.230.117.31])
	by xemacs.org (8.8.5/8.8.5) with SMTP id IAA22452
	for <xemacs-beta@xemacs.org>; Thu, 18 Sep 1997 08:37:26 -0500 (CDT)
Received: (from remek@localhost) by greatwall.npac.syr.edu (950413.SGI.8.6.12/8.6.6) id JAA23190; Thu, 18 Sep 1997 09:37:21 -0400
To: XEmacs Beta List <xemacs-beta@xemacs.org>
Subject: [patch] one more man.el customization variable
X-Attribution: RT
X-Face: +y3+xzgZ,4'l]@20C)#i*'~hA8jYx<!kS/Wx>Y_(BBZi6XfKcvVX2U>Ct]!`@M@d$/n[hvk
 k9;UL{0W`#NUW@Wmz0k$6vZF+Z}H(5c-MxoxIu|k![]6p*4Q_&Rus2,?r)OtakO(6l#\9Djem>r"FV
 qcRq|x0oKmTd2=M}46V+Y
Mime-Version: 1.0 (generated by tm-edit 7.108)
Content-Type: text/plain; charset=US-ASCII
From: Remek Trzaska <remek@postoffice.npac.syr.edu>
Date: 18 Sep 1997 09:37:20 -0400
Message-ID: <rwx90wuu4j3.fsf@greatwall.npac.syr.edu>
Lines: 46
X-Mailer: Gnus v5.5/XEmacs 20.3(beta21) - "Bern"

I like having different things in different frames, for example man
pages.  special-display-regexps seems perfect to achieve it.  Recently
man.el has been updated by Karl, and he removed `man ' prefix from man
buffers names, so regexps became useless in this case.  

Well, I've prepared a patch[1] that lets a user decide about having
this prefix.

Remek

Footnotes: 
[1]  Have mercy, that's my first one! ;-)


--- lisp/packages/man.el.orig   Thu Sep 18 09:09:46 1997
+++ lisp/packages/man.el        Thu Sep 18 09:18:57 1997
@@ -77,6 +77,12 @@
   :type 'boolean
   :group 'man)
 
+(defcustom Manual-buffers-have-prefix nil
+  "*When t, manual page buffers are named with a prefix `man '.
+Otherwise, their titles do not have this prefix."
+  :type 'boolean
+  :group 'man)
+
 ;;Here is information on RosettaMan, from Neal.Becker@comsat.com (Neal Becker):
 
 ;;RosettaMan is a filter for UNIX manual pages.  It takes as input man
@@ -214,7 +220,9 @@
                            "")))
                     (if apropos-mode
                         (concat (maybe-star) "man apropos " topic (maybe-star))
-                      (concat (maybe-star)
+                      (concat (maybe-star) 
+                              (if Manual-buffers-have-prefix
+                                  "man ")
                               topic
                               (if section (concat "(" section ")") "")
                               (maybe-star)))))


-- 
Remek Trzaska
Northeast Parallel Architectures Center -- NPAC, Syracuse, NY
                          http://www.npac.syr.edu/users/remek

