From 7ca8b773bd55de754bb73de1d518b82f2fac8d4d Mon Sep 17 00:00:00 2001 From: Antero Mejr Date: Sat, 18 Jan 2025 22:35:39 -0500 Subject: [PATCH] Add scheme-mode indentation for SRFI 64, R7RS guard * lisp/progmodes/scheme.el: Add properties for SRFI 64 and R7RS guard identifiers. (Bug#75999) (cherry picked from commit d10acd16c90afe9fc8534fcd174397b7c403eda9) --- lisp/progmodes/scheme.el | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/lisp/progmodes/scheme.el b/lisp/progmodes/scheme.el index b5d8d01b7d4..ab9a4915ca6 100644 --- a/lisp/progmodes/scheme.el +++ b/lisp/progmodes/scheme.el @@ -681,10 +681,15 @@ indentation." (put 'define-values 'scheme-indent-function 1) (put 'define-record-type 'scheme-indent-function 1) ;; is 1 correct? (put 'define-library 'scheme-indent-function 1) +(put 'guard 'scheme-indent-function 1) ;; SRFI-8 (put 'receive 'scheme-indent-function 2) +;; SRFI 64 +(put 'test-group 'scheme-indent-function 1) +(put 'test-group-with-cleanup 'scheme-indent-function 1) + ;; SRFI-204 (withdrawn, but provided in many implementations, see the SRFI text) (put 'match 'scheme-indent-function 1) (put 'match-lambda 'scheme-indent-function 0) -- 2.39.5