Mercurial > emacs

diff lisp/man.el @ 108677:7a38217041bb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* lisp/man.el (Man-completion-table): Let the user type "-k ".
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 31 May 2010 12:16:02 -0400
parents df618c2d11bb
children bace4ba4c137 cda2045a5ee8
line wrap: on
line diff
--- a/lisp/man.el	Mon May 31 17:24:46 2010 +0200
+++ b/lisp/man.el	Mon May 31 12:16:02 2010 -0400
@@ -754,6 +754,9 @@
   (cond
    ((eq action 'lambda)
     (not (string-match "([^)]*\\'" string)))
+   ((equal string "-k")
+    ;; Let SPC (minibuffer-complete-word) insert the space.
+    (complete-with-action action '("-k ") string pred))
    (t
     (let ((table (cdr Man-completion-cache))
           (section nil)