Subject: bug#15782: 24.3.50; common-lisp-indent-function for with-compilation-unit

From: Helmut Eller <[email-masked]>
Date: Fri, 01 Nov 2013 15:22:09 +0100

By default, common-lisp-indent-function indents with-compilation-unit
not very nicely. E.g.:

  (with-compilation-unit (:option1 foo
                                   :option2 bar)
    x)

With the patch below it will look better, like so:

  (with-compilation-unit (:option1 foo
                          :option2 bar)
    x)

diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el
index bbfe9ec..cc7d2a8 100644
--- a/lisp/emacs-lisp/cl-indent.el
+++ b/lisp/emacs-lisp/cl-indent.el
@@ -756,6 +756,7 @@ optional\\|rest\\|key\\|allow-other-keys\\|aux\\|whole\\|body\\|environment\
            (when 1)
            (with-accessors . multiple-value-bind)
            (with-condition-restarts . multiple-value-bind)
+	   (with-compilation-unit (&lambda &body))
            (with-output-to-string (4 2))
            (with-slots . multiple-value-bind)
            (with-standard-io-syntax (2)))))