From: Leo Liu <sdl.web@gmail.com>
Date: Fri, 26 Jun 2015 10:02:30 +0000 (+0800)
Subject: Fix indentation for with-output-to-string
X-Git-Tag: emacs-25.0.90~1634^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1546c6f2b399de3dccd65bd5bdbcf1c2b7d32b04;p=emacs.git

Fix indentation for with-output-to-string

* lisp/emacs-lisp/cl-indent.el: Fix indentation for
  `with-output-to-string' in elisp.

  Revert "lisp/emacs-lisp/cl-indent.el: Fix indent of with-output-to-string"
  This reverts commit 659199f2ca5f283fb246faa78a244e5ca25f53dd.
---

diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el
index 9314419a26f..5134e50fa3b 100644
--- a/lisp/emacs-lisp/cl-indent.el
+++ b/lisp/emacs-lisp/cl-indent.el
@@ -827,7 +827,7 @@ optional\\|rest\\|key\\|allow-other-keys\\|aux\\|whole\\|body\\|environment\
            (with-accessors . multiple-value-bind)
            (with-condition-restarts . multiple-value-bind)
 	   (with-compilation-unit (&lambda &body))
-           (with-output-to-string 0)
+           (with-output-to-string (4 2))
            (with-slots . multiple-value-bind)
            (with-standard-io-syntax (2)))))
   (dolist (el l)
@@ -839,6 +839,7 @@ optional\\|rest\\|key\\|allow-other-keys\\|aux\\|whole\\|body\\|environment\
 ;; In elisp, the else part of `if' is in an implicit progn, so indent
 ;; it more.
 (put 'if 'common-lisp-indent-function-for-elisp 2)
+(put 'with-output-to-string 'common-lisp-indent-function-for-elisp 0)
 
 
 ;(defun foo (x)