summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorOleh Krehel <ohwoeowho@gmail.com>2015-02-13 14:34:17 +0100
committerOleh Krehel <ohwoeowho@gmail.com>2015-02-25 12:05:28 +0100
commit26b2e9aa4d022fbd13e7878dab6a1df51eddebc5 (patch)
treea8b2cf523cc4d115a175bf44111a3b8cd705616d /lisp/emacs-lisp
parentdcd4830cb9b716c0d055df84f5106b14585eb879 (diff)
downloademacs-26b2e9aa4d022fbd13e7878dab6a1df51eddebc5.tar.gz
emacs-26b2e9aa4d022fbd13e7878dab6a1df51eddebc5.tar.bz2
emacs-26b2e9aa4d022fbd13e7878dab6a1df51eddebc5.zip
check-declare.el (check-declare-ext-errors): New defcustom.
* emacs-lisp/check-declare.el (check-declare): New defgroup. (check-declare-verify): When `check-declare-ext-errors' is non-nil, warn about an unfound function, instead of saying "skipping external file".
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/check-declare.el11
1 files changed, 10 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/check-declare.el b/lisp/emacs-lisp/check-declare.el
index 13de61c4935..40ab03d8351 100644
--- a/lisp/emacs-lisp/check-declare.el
+++ b/lisp/emacs-lisp/check-declare.el
@@ -125,6 +125,14 @@ With optional argument FULL, sums the number of elements in each element."
(autoload 'byte-compile-arglist-signature "bytecomp")
+(defgroup check-declare nil
+ "Check declare-function statements."
+ :group 'tools)
+
+(defcustom check-declare-ext-errors nil
+ "When non-nil, warn abount functions not found in :ext."
+ :type 'boolean)
+
(defun check-declare-verify (fnfile fnlist)
"Check that FNFILE contains function definitions matching FNLIST.
Each element of FNLIST has the form (FILE FN ARGLIST FILEONLY), where
@@ -226,7 +234,8 @@ method\\|class\\)\\|fset\\)\\>" type)
(when type
(setq errlist (cons (list (car e) (cadr e) type) errlist))))
(message "%s%s" m
- (if (or re (not ext))
+ (if (or re (or check-declare-ext-errors
+ (not ext)))
(check-declare-errmsg errlist)
(progn
(setq errlist nil)