.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:
parent
1fe3eb02f5
commit
48cfce1467
|
@ -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))
|
||||
|
|
Loading…
Reference in New Issue