From e31764707462ba278549aace71b699ef04127cd2 Mon Sep 17 00:00:00 2001 From: Pip Cet Date: Tue, 20 Jul 2021 19:58:16 +0000 Subject: [PATCH] Fix test in byte-optimize-quote * (byte-optimize-quote): Fix condition not to be trivially false. --- lisp/emacs-lisp/byte-opt.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index c9c0ac0045..39ec5aa9fd 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -1077,7 +1077,7 @@ byte-optimize-concat (defun byte-optimize-quote (form) (if (or (consp (nth 1 form)) (and (symbolp (nth 1 form)) - (not (macroexp--const-symbol-p form)))) + (not (macroexp--const-symbol-p (nth 1 form))))) form (nth 1 form))) -- 2.32.0