From: Juanma Barranquero <lekktu@gmail.com>
Date: Mon, 29 Aug 2005 10:41:37 +0000 (+0000)
Subject: (compilation-error-regexp-alist, compilation-mode-font-lock-keywords):
X-Git-Tag: emacs-pretest-22.0.90~7396
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6d74f7822d9b78f2e3bb2b9f447700ae8508e31e;p=emacs.git

(compilation-error-regexp-alist, compilation-mode-font-lock-keywords):
Add defvars.
(checkdoc-interactive-loop): "?\ " -> "?\s".
---

diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el
index 6b6d3ba4393..913ffcf1941 100644
--- a/lisp/emacs-lisp/checkdoc.el
+++ b/lisp/emacs-lisp/checkdoc.el
@@ -190,6 +190,9 @@
      (defmacro defcustom (var value doc &rest args)
        `(defvar ,var ,value ,doc))))
 
+(defvar compilation-error-regexp-alist)
+(defvar compilation-mode-font-lock-keywords)
+
 (defcustom checkdoc-autofix-flag 'semiautomatic
   "*Non-nil means attempt auto-fixing of doc strings.
 If this value is the symbol `query', then the user is queried before
@@ -653,7 +656,7 @@ style."
 			    "No Additional style errors.  Continuing...")
 			   (sit-for 2))))))
 	       ;; Move to the next error (if available)
-	       ((or (checkdoc-char= c ?n) (checkdoc-char= c ?\ ))
+	       ((or (checkdoc-char= c ?n) (checkdoc-char= c ?\s))
 		(let ((ne (funcall findfunc nil)))
 		  (if (not ne)
 		      (if showstatus