From: Eli Zaretskii <eliz@is.elta.co.il>
Date: Mon, 16 Feb 2004 18:22:33 +0000 (+0000)
Subject: (Man-fontify-manpage): Render section headings in
X-Git-Tag: ttn-vms-21-2-B4~7586
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1c0ecbc4990861eee12b7983a068e976ad37fd23;p=emacs.git

(Man-fontify-manpage): Render section headings in
`Man-overstrike-face' even when overstrike was not used by man
formatter for section headings.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 09d5dc617f2..047a82f7cdd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2004-02-16  John Basrai  <jbasrai@comcast.net>  (tiny change)
+
+	* man.el (Man-fontify-manpage): Render section headings in
+	`Man-overstrike-face' even when overstrike was not used by man
+	formatter for section headings.
+
 2004-02-16  Eli Tziperman  <eli@deas.harvard.edu>
 
 	* rmail-spam-filter.el: (vm-use-spam-filter)
diff --git a/lisp/man.el b/lisp/man.el
index faf153bc4c4..0e665af723e 100644
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -801,6 +801,11 @@ Same for the ANSI bold and normal escape sequences."
   ;; Try to recognize common forms of cross references.
   (Man-highlight-references)
   (Man-softhyphen-to-minus)
+  (goto-char (point-min))
+  (while (re-search-forward Man-heading-regexp nil t)
+    (put-text-property (match-beginning 0)
+		       (match-end 0)
+		       'face Man-overstrike-face))
   (message "%s man page formatted" Man-arguments))
 
 (defun Man-highlight-references ()