1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00

Fix a missing `and'

This commit is contained in:
John Wiegley 2017-11-29 16:53:41 -08:00
parent 6a62122e9c
commit 1167e7d063

View File

@ -830,8 +830,8 @@ If the package is installed, its entry is removed from
If ALLOW-EMPTY is non-nil, it's OK for ARGS to be an empty list."
(declare (indent 1))
(if (if args
(listp args) (listp (cdr args))
allow-empty)
(and (listp args) (listp (cdr args)))
allow-empty)
(if (= (length args) 1)
(funcall f label (car args))
(funcall f label args))