changeset 22180:485917486caf

Indent `with-standard-io-syntax' correctly.
author Richard M. Stallman <rms@gnu.org>
date Fri, 22 May 1998 04:42:48 +0000
parents edc72bb3a3ff
children dc8c3736ebea
files lisp/emacs-lisp/cl-indent.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl-indent.el	Fri May 22 03:24:28 1998 +0000
+++ b/lisp/emacs-lisp/cl-indent.el	Fri May 22 04:42:48 1998 +0000
@@ -433,7 +433,8 @@
 	   (throw 1)
 	   (unless 1)
 	   (unwind-protect (5 &body))
-	   (when 1))))
+           (when 1)
+           (with-standard-io-syntax (2)))))
   (while l
     (put (car (car l)) 'common-lisp-indent-function
 	 (if (symbolp (cdr (car l)))