mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-30 09:00:31 -08:00
Code Issues Projects Releases Wiki Activity

Fix indentation for with-output-to-string

Browse source 
* 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 659199f2ca.
This commit is contained in:
Leo Liu 2015-06-26 18:02:30 +08:00
parent f142756338
commit 1546c6f2b3
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/emacs-lisp/cl-indent.el
View file

@ -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)