2017-12-16 05:53:20 +00:00
|
|
|
((scheme-mode
|
|
|
|
.
|
|
|
|
((eval . (put '<sh-case> 'scheme-indent-function 1))
|
2018-10-17 19:40:38 +01:00
|
|
|
(eval . (put '<sh-defun> 'scheme-indent-function 1))
|
2017-12-16 05:53:20 +00:00
|
|
|
(eval . (put '<sh-exec-let> 'scheme-indent-function 1))
|
|
|
|
(eval . (put '<sh-for> 'scheme-indent-function 1))
|
|
|
|
(eval . (put '<sh-until> 'scheme-indent-function 1))
|
|
|
|
(eval . (put '<sh-while> 'scheme-indent-function 1))
|
|
|
|
(eval . (put '<sh-with-redirects> 'scheme-indent-function 1))
|
2018-07-17 03:33:03 +01:00
|
|
|
(eval . (put 'call-with-backquoted-input-port 'scheme-indent-function 1))
|
2018-07-19 04:41:10 +01:00
|
|
|
(eval . (put 'make-script 'scheme-indent-function 1))
|
2018-10-16 20:26:40 +01:00
|
|
|
(eval . (put 'sh:for 'scheme-indent-function 2))
|
2018-07-19 04:42:13 +01:00
|
|
|
(eval . (put 'sh:subshell 'scheme-indent-function 1))
|
2018-07-19 04:44:04 +01:00
|
|
|
(eval . (put 'sh:substitute-command 'scheme-indent-function 1))
|
2018-11-09 03:11:34 +00:00
|
|
|
(eval . (put 'sh:with-redirects 'scheme-indent-function 2))
|
|
|
|
(eval . (put 'with-environment-arguments 'scheme-indent-function 2)))))
|