# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1035917310 0
# Node ID a3d1322abc889a768c4ae553055a3793f1aba83a
# Parent  1b334a808f0f4d3bc16ebe3d1ef34e08055fd2aa
(syntax-case): Define
scheme-indent-function.

diff -r 1b334a808f0f -r a3d1322abc88 lisp/progmodes/scheme.el
--- a/lisp/progmodes/scheme.el	Tue Oct 29 18:37:26 2002 +0000
+++ b/lisp/progmodes/scheme.el	Tue Oct 29 18:48:30 2002 +0000
@@ -502,7 +502,7 @@
 (put 'let-syntax 'scheme-indent-function 1)
 (put 'letrec-syntax 'scheme-indent-function 1)
 (put 'syntax-rules 'scheme-indent-function 1)
-
+(put 'syntax-case 'scheme-indent-function 2) ; not r5rs
 
 (put 'call-with-input-file 'scheme-indent-function 1)
 (put 'with-input-from-file 'scheme-indent-function 1)