tests: Fix max-silent-time test.
[jackhill/guix/guix.git] / .dir-locals.el
CommitLineData
1722d680
LC
1;; Per-directory local variables for GNU Emacs 23 and later.
2
5cfdcd6a 3((nil . ((fill-column . 78)
1722d680
LC
4 (tab-width . 8)))
5 (c-mode . ((c-file-style . "gnu")))
6 (scheme-mode
7 .
8 ((indent-tabs-mode . nil)
0bdba772
LC
9 (eval . (put 'test-assert 'scheme-indent-function 1))
10 (eval . (put 'test-equal 'scheme-indent-function 1))
11 (eval . (put 'call-with-input-string 'scheme-indent-function 1))
12 (eval . (put 'guard 'scheme-indent-function 1))
1722d680
LC
13 (eval . (put 'lambda* 'scheme-indent-function 1))
14 (eval . (put 'substitute* 'scheme-indent-function 1))
15 (eval . (put 'with-directory-excursion 'scheme-indent-function 1))
2a8417ac 16 (eval . (put 'package 'scheme-indent-function 0))
a2078770
LC
17 (eval . (put 'manifest-entry 'scheme-indent-function 0))
18 (eval . (put 'manifest-pattern 'scheme-indent-function 0))
073c34d7 19 (eval . (put 'substitute-keyword-arguments 'scheme-indent-function 1))
03323862 20 (eval . (put 'with-error-handling 'scheme-indent-function 0))
b860f382
LC
21 (eval . (put 'with-mutex 'scheme-indent-function 1))
22
23 (eval . (put 'syntax-parameterize 'scheme-indent-function 1))
24 (eval . (put 'with-monad 'scheme-indent-function 1))
25 (eval . (put 'mlet* 'scheme-indent-function 2))
26 (eval . (put 'mlet 'scheme-indent-function 2))
27 (eval . (put 'run-with-store 'scheme-indent-function 1))))
1722d680
LC
28 (emacs-lisp-mode . ((indent-tabs-mode . nil)))
29 (texinfo-mode . ((indent-tabs-mode . nil)
30 (fill-column . 72))))