diff options
author | David Thompson <dthompson@vistahigherlearning.com> | 2021-04-18 11:56:14 -0400 |
---|---|---|
committer | David Thompson <dthompson@vistahigherlearning.com> | 2021-04-18 11:56:14 -0400 |
commit | d392bd16efc990bb135275e4a1c7919e300db181 (patch) | |
tree | 2057da321ccd8f815d02d33c1acabfbc66968b9e | |
parent | c03652fbc68b781f78196cedc2086db256c46d9e (diff) |
Add .dir-locals.el file.
-rw-r--r-- | .dir-locals.el | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/.dir-locals.el b/.dir-locals.el new file mode 100644 index 0000000..37b827b --- /dev/null +++ b/.dir-locals.el @@ -0,0 +1,31 @@ +((scheme-mode + . + ((eval . (put 'with-blend-mode 'scheme-indent-function 1)) + (eval . (put 'with-polygon-mode 'scheme-indent-function 1)) + (eval . (put 'with-cull-face-mode 'scheme-indent-function 1)) + (eval . (put 'with-depth-test 'scheme-indent-function 1)) + (eval . (put 'with-texture 'scheme-indent-function 2)) + (eval . (put 'with-shader 'scheme-indent-function 1)) + (eval . (put 'with-vertex-array 'scheme-indent-function 1)) + (eval . (put 'with-projection 'scheme-indent-function 1)) + (eval . (put 'with-framebuffer 'scheme-indent-function 1)) + (eval . (put 'with-viewport 'scheme-indent-function 1)) + (eval . (put 'with-mapped-buffer 'scheme-indent-function 1)) + (eval . (put 'with-new-rect 'scheme-indent-function 1)) + (eval . (put 'with-new-vec2 'scheme-indent-function 1)) + (eval . (put 'with-dynamic-state 'scheme-indent-function 1)) + (eval . (put 'with-mapped-buffer-view 'scheme-indent-function 1)) + (eval . (put 'with-stencil-test 'scheme-indent-function 1)) + (eval . (put 'with-multisample 'scheme-indent-function 1)) + (eval . (put 'with-color-mask 'scheme-indent-function 1)) + (eval . (put 'with-style 'scheme-indent-function 1)) + (eval . (put 'with-transform 'scheme-indent-function 1)) + (eval . (put 'with-geometry 'scheme-indent-function 1)) + (eval . (put 'with-geometry* 'scheme-indent-function 2)) + (eval . (put 'with-graphics-state 'scheme-indent-function 1)) + (eval . (put 'with-graphics-state! 'scheme-indent-function 1)) + (eval . (put 'translate 'scheme-indent-function 1)) + (eval . (put 'rotate 'scheme-indent-function 1)) + (eval . (put 'scale 'scheme-indent-function 1)) + (eval . (put 'for-range 'scheme-indent-function 1)) + (eval . (put 'run-script 'scheme-indent-function 1))))) |