diff --git a/lisp/subr.el b/lisp/subr.el
index af0a208f7be..c13c3c6cc54 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -7073,7 +7073,7 @@ CONDITION is either:
                        (provided-mode-derived-p
                         (buffer-local-value 'major-mode buffer)
                         mode))
-                      (`(not ,cond)
+                      (`(not . ,cond)
                        (not (funcall match cond)))
                       (`(or . ,args)
                        (funcall match args))