From a67cc630db28cf734d0e47f231add30c782bd8cf Mon Sep 17 00:00:00 2001 From: Alan Mackenzie Date: Tue, 24 Nov 2015 12:40:39 +0000 Subject: [PATCH] Byte compile: Output an error, not a warning, for odd number of args to setq * lisp/emacs-lisp/bytecomp.el (byte-compile-setq): Amend. --- lisp/emacs-lisp/bytecomp.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index b29e77b14b5..5e6df282b3f 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -3713,9 +3713,9 @@ discarding." (if args (while args (if (eq (length args) 1) - (byte-compile-warn - "missing value for `%S' at end of setq" - (car args))) + (byte-compile-log-warning + (format "missing value for `%S' at end of setq" (car args)) + nil :error)) (byte-compile-form (car (cdr args))) (or byte-compile--for-effect (cdr (cdr args)) (byte-compile-out 'byte-dup 0)) -- 2.39.5