[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100389: * lisp/emacs-lisp/checkdoc.el (checkdoc-this-string-valid-engine):

[Stefan Monnier]

------------------------------------------------------------
revno: 100389
author: Jari Aalto <address@hidden>
committer: Stefan Monnier <address@hidden>
branch nick: emacs-23
timestamp: Fri 2011-01-21 13:12:32 -0500
message:
  * lisp/emacs-lisp/checkdoc.el (checkdoc-this-string-valid-engine):
  Assume foo(bar) is a manpage reference rather than some unquoted symbol.
modified:
  lisp/ChangeLog
  lisp/emacs-lisp/checkdoc.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-01-21 18:07:41 +0000
+++ b/lisp/ChangeLog    2011-01-21 18:12:32 +0000
@@ -1,3 +1,8 @@
+2011-01-21  Jari Aalto  <address@hidden>
+
+       * 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  <address@hidden>
 
        * subr.el (shell-quote-argument): Properly quote \n (bug#7687).

=== modified file 'lisp/emacs-lisp/checkdoc.el'
--- a/lisp/emacs-lisp/checkdoc.el       2011-01-02 23:50:46 +0000
+++ b/lisp/emacs-lisp/checkdoc.el       2011-01-21 18:12:32 +0000
@@ -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