pki: Add 'signature-case' macro.
[jackhill/guix/guix.git] / .dir-locals.el
1 ;; Per-directory local variables for GNU Emacs 23 and later.
2
3 ((nil . ((fill-column . 78)
4 (tab-width . 8)))
5 (c-mode . ((c-file-style . "gnu")))
6 (scheme-mode
7 .
8 ((indent-tabs-mode . nil)
9 (eval . (put 'test-assert 'scheme-indent-function 1))
10 (eval . (put 'test-equal 'scheme-indent-function 1))
11 (eval . (put 'test-eq 'scheme-indent-function 1))
12 (eval . (put 'call-with-input-string 'scheme-indent-function 1))
13 (eval . (put 'guard 'scheme-indent-function 1))
14 (eval . (put 'lambda* 'scheme-indent-function 1))
15 (eval . (put 'substitute* 'scheme-indent-function 1))
16 (eval . (put 'with-directory-excursion 'scheme-indent-function 1))
17 (eval . (put 'package 'scheme-indent-function 0))
18 (eval . (put 'origin 'scheme-indent-function 0))
19 (eval . (put 'manifest-entry 'scheme-indent-function 0))
20 (eval . (put 'manifest-pattern 'scheme-indent-function 0))
21 (eval . (put 'substitute-keyword-arguments 'scheme-indent-function 1))
22 (eval . (put 'with-store 'scheme-indent-function 1))
23 (eval . (put 'with-error-handling 'scheme-indent-function 0))
24 (eval . (put 'with-mutex 'scheme-indent-function 1))
25 (eval . (put 'with-atomic-file-output 'scheme-indent-function 1))
26 (eval . (put 'call-with-compressed-output-port 'scheme-indent-function 2))
27 (eval . (put 'call-with-decompressed-port 'scheme-indent-function 2))
28 (eval . (put 'signature-case 'scheme-indent-function 1))
29
30 (eval . (put 'syntax-parameterize 'scheme-indent-function 1))
31 (eval . (put 'with-monad 'scheme-indent-function 1))
32 (eval . (put 'mlet* 'scheme-indent-function 2))
33 (eval . (put 'mlet 'scheme-indent-function 2))
34 (eval . (put 'run-with-store 'scheme-indent-function 1))))
35 (emacs-lisp-mode . ((indent-tabs-mode . nil)))
36 (texinfo-mode . ((indent-tabs-mode . nil)
37 (fill-column . 72))))