Indent `pprint-logical-block' properly.

diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el
index 20f2afe80053ea4371f05f165c43154b5ff4288d..85c3e626cee2905892c967cc62c7c683ce606323 100644 (file)
--- a/lisp/emacs-lisp/cl-indent.el
+++ b/lisp/emacs-lisp/cl-indent.el
@@ -429,6 +429,7 @@ by `lisp-body-indent'."
           (multiple-value-setq
                        (4 2))
           (multiple-value-setf . multiple-value-setq)
+           (pprint-logical-block (4 2))
           ;; Combines the worst features of BLOCK, LET and TAGBODY
           (prog        (&lambda &rest lisp-indent-tagbody))
           (prog* . prog)