1 Fix 'scheme-indent-function' to indent s-expressions starting with a keyword
12 The fix is made by Mark H Weaver <mhw@netris.org>:
13 <http://www.netris.org/~mhw/scheme-indent-function.el>
15 --- a/lisp/progmodes/scheme.el
16 +++ b/lisp/progmodes/scheme.el
17 @@ -494,6 +494,12 @@ indentation."
18 (> (length function) 3)
19 (string-match "\\`def" function)))
20 (lisp-indent-defform state indent-point))
22 + (> (length function) 1)
23 + ;; The '#' in '#:' seems to get lost, not sure why
24 + (string-match "\\`:" function))
25 + (let ((lisp-body-indent 1))
26 + (lisp-indent-defform state indent-point)))
28 (lisp-indent-specform method state
29 indent-point normal-indent))