Commit 19d6e0f1 authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen

Fix up the non-toplevel form to mimick no-warnings syntactically

parent a9c3082d
Pipeline #1965 failed with stage
in 17 seconds
......@@ -4805,8 +4805,7 @@ binding slots have been popped."
(defun byte-compile-suppressed-warnings (form)
(let ((byte-compile--suppressed-warnings
(append (cadadr form) byte-compile--suppressed-warnings)))
(byte-compile-progn (cons 'progn (cddr form)))
nil))
(byte-compile-form (cons 'progn (cddr form)))))
;; Warn about misuses of make-variable-buffer-local.
(byte-defop-compiler-1 make-variable-buffer-local
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment