blob: 8c0190414fdbf04fd7a8f501f4192a80bf3b4468 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
;;; Directory Local Variables
;;; For more information see (info "(emacs) Directory Variables")
((nil
(indent-tabs-mode))
(makefile-gmake-mode
(indent-tabs-mode t))
(scheme-mode
(eval . (put 'call-with-current-directory 'scheme-indent-function 1))
(eval . (put 'call-with-file-in-git 'scheme-indent-function 2))
(eval . (put 'call-with-temporary-checkout 'scheme-indent-function 1))
(eval . (put 'call-with-temporary-checkouts 'scheme-indent-function 1))
(eval . (put 'function-documentation 'scheme-indent-function 2))
(eval . (put 'docstring-function-documentation 'scheme-indent-function 2))
(eval . (put 'with-ellipsis 'scheme-indent-function 1))
(eval . (put 'with-variable 'scheme-indent-function 2))
(eval . (put 'with-variables 'scheme-indent-function 1))
(eval . (font-lock-add-keywords 'scheme-mode
(list (cons (rx "(" (group "define-lazy"))
(list 1 'font-lock-keyword-face))
(cons (rx "(define-lazy (" (group (one-or-more (not space))))
(list 1 'font-lock-function-name-face)))))))
|
