Add indentation for `with-values'.
authorChris Hanson <org/chris-hanson/cph>
Mon, 25 Apr 1988 12:53:38 +0000 (12:53 +0000)
committerChris Hanson <org/chris-hanson/cph>
Mon, 25 Apr 1988 12:53:38 +0000 (12:53 +0000)
etc/scheme.el

index 6c02975064ca6ddf8f15c65ad4c4c42fe599c009..a38753e2976df6ac7a37f94de1fb07f14a1ad6b6 100644 (file)
@@ -24,7 +24,7 @@
 ;; of special forms.  Probably the code should be merged at some point 
 ;; so that there is sharing between both libraries.
 
-;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/scheme.el,v 1.5 1988/04/12 17:03:26 cph Exp $
+;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/scheme.el,v 1.6 1988/04/25 12:53:38 cph Exp $
 
 (provide 'scheme)
 \f
@@ -423,6 +423,7 @@ of the start of the containing expression."
 
       (put 'with-input-from-string 'scheme-indent-hook 1)
       (put 'with-output-to-string 'scheme-indent-hook 0)
+      (put 'with-values 'scheme-indent-hook 1)
 
       (put 'syntax-table-define 'scheme-indent-hook 2)
       (put 'list-transform-positive 'scheme-indent-hook 1)