# HG changeset patch # User Stefan Monnier # Date 1295633552 18000 # Node ID a651b7492a7863665f8d7f90d7d38a75b9ef32a8 # Parent 106bf56d370ea299fa9d48de806c75b696563a77 * lisp/emacs-lisp/checkdoc.el (checkdoc-this-string-valid-engine): Assume foo(bar) is a manpage reference rather than some unquoted symbol. diff -r 106bf56d370e -r a651b7492a78 lisp/ChangeLog --- a/lisp/ChangeLog Fri Jan 21 13:07:41 2011 -0500 +++ b/lisp/ChangeLog Fri Jan 21 13:12:32 2011 -0500 @@ -1,3 +1,8 @@ +2011-01-21 Jari Aalto + + * emacs-lisp/checkdoc.el (checkdoc-this-string-valid-engine): (bug#7705) + Assume foo(bar) is a manpage reference rather than some unquoted symbol. + 2011-01-21 Stefan Monnier * subr.el (shell-quote-argument): Properly quote \n (bug#7687). diff -r 106bf56d370e -r a651b7492a78 lisp/emacs-lisp/checkdoc.el --- a/lisp/emacs-lisp/checkdoc.el Fri Jan 21 13:07:41 2011 -0500 +++ b/lisp/emacs-lisp/checkdoc.el Fri Jan 21 13:12:32 2011 -0500 @@ -1817,7 +1817,9 @@ (let ((found nil) (start (point)) (msg nil) (ms nil)) (while (and (not msg) (re-search-forward - "[^-([`':a-zA-Z]\\(\\w+[:-]\\(\\w\\|\\s_\\)+\\)[^]']" + ;; Ignore manual page refereces like + ;; git-config(1). + "[^-([`':a-zA-Z]\\(\\w+[:-]\\(\\w\\|\\s_\\)+\\)[^](']" e t)) (setq ms (match-string 1)) ;; A . is a \s_ char, so we must remove periods from