Commit a6cbf14a authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen

Avoid adding a second progn layer if there's already a progn there

parent 187e8501
Pipeline #1983 failed with stage
in 2 seconds
......@@ -4797,7 +4797,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-form (cons 'progn (cddr form)))))
(byte-compile-form (macroexp-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