changeset 106245:efd193fda91a

(Man-completion-table): Modify regexp to include section names to completion strings. (Bug#3717)
author Juri Linkov <juri@jurta.org>
date Wed, 25 Nov 2009 21:16:58 +0000
parents af182a117edd
children ea305afedc95
files lisp/ChangeLog lisp/man.el
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Wed Nov 25 17:53:54 2009 +0000
+++ b/lisp/ChangeLog	Wed Nov 25 21:16:58 2009 +0000
@@ -1,3 +1,8 @@
+2009-11-25  Juri Linkov  <juri@jurta.org>
+
+	* man.el (Man-completion-table): Modify regexp to include
+	section names to completion strings.  (Bug#3717)
+
 2009-11-25  Juri Linkov  <juri@jurta.org>
 
 	Search recursively in gzipped files.  (Bug#4982)
--- a/lisp/man.el	Wed Nov 25 17:53:54 2009 +0000
+++ b/lisp/man.el	Wed Nov 25 21:16:58 2009 +0000
@@ -770,7 +770,7 @@
           (call-process manual-program nil '(t nil) nil
                         "-k" (concat "^" string))
         (goto-char (point-min))
-        (while (re-search-forward "^[^ \t\n]+" nil t)
+        (while (re-search-forward "^[^ \t\n]+\\(?: (.+?)\\)?" nil t)
           (push (match-string 0) table)))
         ;; Cache the table for later reuse.
         (setq Man-completion-cache (cons string table)))