diff options
| author | Juanma Barranquero <[email protected]> | 2005-08-29 10:41:37 +0000 |
|---|---|---|
| committer | Juanma Barranquero <[email protected]> | 2005-08-29 10:41:37 +0000 |
| commit | 6d74f7822d9b78f2e3bb2b9f447700ae8508e31e (patch) | |
| tree | 08457d8f3a83254ccb79d244109743877ca8d0b4 | |
| parent | 35d886bb7f835694a3cfb0f878711d88a468c4b0 (diff) | |
(compilation-error-regexp-alist, compilation-mode-font-lock-keywords):
Add defvars.
(checkdoc-interactive-loop): "?\ " -> "?\s".
| -rw-r--r-- | lisp/emacs-lisp/checkdoc.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el index 6b6d3ba439..913ffcf194 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 |