1 2 3 4
((scheme-mode . ((eval . (put 'call-with-window 'scheme-indent-function 1)) (eval . (put 'call-with-renderer 'scheme-indent-function 1)))))