diff options
Diffstat (limited to 'lisp/+chicken.el')
-rw-r--r-- | lisp/+chicken.el | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lisp/+chicken.el b/lisp/+chicken.el index 55fc48e..15713f8 100644 --- a/lisp/+chicken.el +++ b/lisp/+chicken.el | |||
@@ -18,5 +18,17 @@ | |||
18 | "awful" "--development-mode" (buffer-file-name)))) | 18 | "awful" "--development-mode" (buffer-file-name)))) |
19 | (t (message "Some awful error occurred!")))) | 19 | (t (message "Some awful error occurred!")))) |
20 | 20 | ||
21 | (defun +chicken-indentation-insinuate () | ||
22 | "Insinuate indentation from | ||
23 | https://wiki.call-cc.org/emacs#tweaking-stock-scheme-mode-indentation." | ||
24 | (defun scheme-module-indent (state indent-point normal-indent) 0) | ||
25 | (put 'module 'scheme-indent-function 'scheme-module-indent) | ||
26 | (put 'and-let* 'scheme-indent-function 1) | ||
27 | (put 'parameterize 'scheme-indent-function 1) | ||
28 | (put 'handle-exceptions 'scheme-indent-function 1) | ||
29 | (put 'when 'scheme-indent-function 1) | ||
30 | (put 'unless 'scheme-indent-function 1) | ||
31 | (put 'match 'scheme-indent-function 1)) | ||
32 | |||
21 | (provide '+chicken) | 33 | (provide '+chicken) |
22 | ;;; +chicken.el ends here | 34 | ;;; +chicken.el ends here |