summaryrefslogtreecommitdiff
path: root/.dir-locals.el
diff options
context:
space:
mode:
Diffstat (limited to '.dir-locals.el')
-rw-r--r--.dir-locals.el20
1 files changed, 20 insertions, 0 deletions
diff --git a/.dir-locals.el b/.dir-locals.el
new file mode 100644
index 0000000..57fd98f
--- /dev/null
+++ b/.dir-locals.el
@@ -0,0 +1,20 @@
+((scheme-mode
+ .
+ ((eval . (put 'call-with-transform-excursion 'scheme-indent-function 1))
+ (eval . (put 'with-transform-excursion 'scheme-indent-function 1))
+ (eval . (put 'graphics-model-view-excursion 'scheme-indent-function 1))
+ (eval . (put 'graphics-projection-excursion 'scheme-indent-function 1))
+ (eval . (put 'graphics-uniform-excursion 'scheme-indent-function 2))
+ (eval . (put 'graphics-mesh-excursion 'scheme-indent-function 1))
+ (eval . (put 'with-blend-mode 'scheme-indent-function 1))
+ (eval . (put 'with-depth-test 'scheme-indent-function 1))
+ (eval . (put 'with-texture 'scheme-indent-function 1))
+ (eval . (put 'with-shader 'scheme-indent-function 1))
+ (eval . (put 'with-mesh 'scheme-indent-function 1))
+ (eval . (put 'with-framebuffer 'scheme-indent-function 1))
+ (eval . (put 'with-viewport 'scheme-indent-function 1))
+ (eval . (put 'with-projection-mul 'scheme-indent-function 1))
+ (eval . (put 'with-model-view-mul 'scheme-indent-function 1))
+ (eval . (put 'with-camera 'scheme-indent-function 1))
+ (eval . (put 'with-color 'scheme-indent-function 1))
+ (eval . (put 'uniform-let 'scheme-indent-function 1)))))