.dir-locals: Add test macro indentation.

* .dir-locals.el (scheme-mode): Add indentation for pass-if,
pass-if-not, pass-if-eq, pass-if-equal, expect-fail, pass-if-timeout.
This commit is contained in:
Jan (janneke) Nieuwenhuizen 2020-12-30 11:47:32 +01:00
parent eec87d191d
commit d51777a5b5
No known key found for this signature in database
GPG Key ID: F3C1A0D9C1D65273
1 changed files with 9 additions and 0 deletions

View File

@ -35,6 +35,14 @@
.
((geiser-active-implementations . (guile))
;; Guile syntax
(eval . (put 'pass-if 'scheme-indent-function 1))
(eval . (put 'pass-if-not 'scheme-indent-function 1))
(eval . (put 'pass-if-eq 'scheme-indent-function 2))
(eval . (put 'pass-if-equal 'scheme-indent-function 2))
(eval . (put 'expect-fail 'scheme-indent-function 2))
(eval . (put 'pass-if-timeout 'scheme-indent-function 2))
;; Guix package
(eval . (put 'package 'scheme-indent-function 0))
(eval . (put 'origin 'scheme-indent-function 0))
@ -50,6 +58,7 @@
(eval
.
(progn
(defun prefix-dir-locals-dir (elt)
(concat (locate-dominating-file buffer-file-name ".dir-locals.el") elt))