diff options
| author | John Paul Wallington <jpw@pobox.com> | 2003-10-20 17:16:16 +0000 |
|---|---|---|
| committer | John Paul Wallington <jpw@pobox.com> | 2003-10-20 17:16:16 +0000 |
| commit | 748fb1aabd8cb3fd65128560bbf6085efaa59a0e (patch) | |
| tree | 2c37137e0521c3879c39e28d794cbd6aa1340212 /lisp/emacs-lisp/elint.el | |
| parent | 62d2014211134a9bbbd51c522074a3f4a8ae43a5 (diff) | |
| download | emacs-748fb1aabd8cb3fd65128560bbf6085efaa59a0e.tar.gz emacs-748fb1aabd8cb3fd65128560bbf6085efaa59a0e.tar.bz2 emacs-748fb1aabd8cb3fd65128560bbf6085efaa59a0e.zip | |
(elint-check-defcustom-form): Don't use `evenp' so we don't implicitly
require cl library at runtime.
Diffstat (limited to 'lisp/emacs-lisp/elint.el')
| -rw-r--r-- | lisp/emacs-lisp/elint.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/elint.el b/lisp/emacs-lisp/elint.el index 75ca3122773..f0f8add4879 100644 --- a/lisp/emacs-lisp/elint.el +++ b/lisp/emacs-lisp/elint.el @@ -540,7 +540,8 @@ CODE can be a lambda expression, a macro, or byte-compiled code." (defun elint-check-defcustom-form (form env) "Lint the defcustom FORM in ENV." (if (and (> (length form) 3) - (evenp (length form))) ; even no. of keyword/value args + ;; even no. of keyword/value args ? + (zerop (logand (length form) 1))) (elint-env-add-global-var (elint-form (nth 2 form) env) (car (cdr form))) (elint-error "Malformed variable declaration: %s" form) |