From 3a6dfbf743cc56b7d454bc6c688cd983966acc6c Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Thu, 29 Sep 2011 18:43:27 +0200
Subject: [PATCH] Racket: indentation for splicing-let and friends

At some point, we should make indentation rules buffer-local.
---
 elisp/geiser-racket.el | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el
index df6128e..ff7b738 100644
--- a/elisp/geiser-racket.el
+++ b/elisp/geiser-racket.el
@@ -232,13 +232,25 @@ This function uses `geiser-racket-init-file' if it exists."
       (geiser-racket--explicit-module)))
 
 
-;;; Keywords
+;;; Keywords and syntax
 (defun geiser-racket--keywords ()
   (cons '("^#lang\\>" . 0)
         (when geiser-racket-extra-keywords
           `((,(format "[[(]%s\\>" (regexp-opt geiser-racket-extra-keywords 1))
              . 1)))))
 
+(geiser-syntax--scheme-indent
+ (splicing-let 1)
+ (splicing-letrec 1)
+ (splicing-let-values 1)
+ (splicing-letrec-values 1)
+ (splicing-let-syntax 1)
+ (splicing-letrec-syntax 1)
+ (splicing-let-syntaxes 1)
+ (splicing-letrec-syntaxes 1)
+ (splicing-letrec-syntaxes+values 1)
+ (splicing-local 1))
+
 
 ;;; Remote REPLs
 
-- 
2.11.4.GIT