diff options
| author | Yuuki Harano <masm+github@masm11.me> | 2020-12-14 01:52:10 +0900 |
|---|---|---|
| committer | Yuuki Harano <masm+github@masm11.me> | 2020-12-14 01:52:10 +0900 |
| commit | 3e30047ce3a81dd0879973012abbf570d3215dfd (patch) | |
| tree | c7c10e82f2ff37705356a0c25b98d92c603c7983 /lisp/emacs-lisp/elint.el | |
| parent | aea5dbec2514811fb2e1cc44b2347a976a5b7de8 (diff) | |
| parent | fe50a8b9ba79b4ac14a3a352d8bf84eaee4f2122 (diff) | |
| download | emacs-3e30047ce3a81dd0879973012abbf570d3215dfd.tar.gz emacs-3e30047ce3a81dd0879973012abbf570d3215dfd.tar.bz2 emacs-3e30047ce3a81dd0879973012abbf570d3215dfd.zip | |
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs into feature/pgtk
Diffstat (limited to 'lisp/emacs-lisp/elint.el')
| -rw-r--r-- | lisp/emacs-lisp/elint.el | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/elint.el b/lisp/emacs-lisp/elint.el index ef97c8279d7..79b72ff969f 100644 --- a/lisp/emacs-lisp/elint.el +++ b/lisp/emacs-lisp/elint.el @@ -558,7 +558,8 @@ Return nil if there are no more forms, t otherwise." (when . elint-check-conditional-form) (unless . elint-check-conditional-form) (and . elint-check-conditional-form) - (or . elint-check-conditional-form)) + (or . elint-check-conditional-form) + (require . elint-require-form)) "Functions to call when some special form should be linted.") (defun elint-form (form env &optional nohandler) @@ -953,6 +954,13 @@ Does basic handling of `featurep' tests." (elint-form form env t)))) env) +(defun elint-require-form (form _env) + "Load `require'd files." + (pcase form + (`(require ',x) + (require x))) + nil) + ;;; ;;; Message functions ;;; |