1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index 56dcc9e2427..be958e53abb 100644
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -1826,7 +1826,7 @@ may generate incorrect code.")
       (setq lap0 (car rest)
             lap1 (nth 1 rest))
       (if (memq (car lap0) byte-constref-ops)
-          (if (eq (cdr lap0) 'byte-constant)
+          (if (not (eq (car lap0) 'byte-constant))
               (or (memq (cdr lap0) byte-compile-variables)
                   (setq byte-compile-variables (cons (cdr lap0)
                                                      byte-compile-variables)))