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: 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
--
cgit v1.2.3