diff lisp/man.el @ 41710:6515e3108ceb

(Man-build-section-alist): Remove last Man-match-substring.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 30 Nov 2001 21:56:46 +0000
parents 722fe545e535
children be541feb06cc
line wrap: on
line diff
--- a/lisp/man.el	Fri Nov 30 17:18:27 2001 +0000
+++ b/lisp/man.el	Fri Nov 30 21:56:46 2001 +0000
@@ -867,7 +867,7 @@
   (goto-char (point-min))
   (let ((case-fold-search nil))
     (while (re-search-forward Man-heading-regexp (point-max) t)
-      (aput 'Man-sections-alist (Man-match-substring 1))
+      (aput 'Man-sections-alist (match-string 1))
       (forward-line 1))))
 
 (defsubst Man-build-references-alist ()