diff options
| author | Leo Liu <sdl.web@gmail.com> | 2015-06-26 18:02:30 +0800 |
|---|---|---|
| committer | Leo Liu <sdl.web@gmail.com> | 2015-06-26 18:03:30 +0800 |
| commit | 1546c6f2b399de3dccd65bd5bdbcf1c2b7d32b04 (patch) | |
| tree | 7851e6804f357a098379f9a8339f74b0b5b44be2 /lisp/emacs-lisp | |
| parent | f14275633851b047e5aecfa6d12f160ee4c2f149 (diff) | |
| download | emacs-1546c6f2b399de3dccd65bd5bdbcf1c2b7d32b04.tar.gz emacs-1546c6f2b399de3dccd65bd5bdbcf1c2b7d32b04.tar.bz2 emacs-1546c6f2b399de3dccd65bd5bdbcf1c2b7d32b04.zip | |
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.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/cl-indent.el | 3 |
1 files changed, 2 insertions, 1 deletions
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) |