diff --git a/.dir-locals.el b/.dir-locals.el index 90257e7bf..908670479 100644 --- a/.dir-locals.el +++ b/.dir-locals.el @@ -47,6 +47,7 @@ (eval . (put '$letrec 'scheme-indent-function 3)) (eval . (put '$kclause 'scheme-indent-function 1)) (eval . (put '$fun 'scheme-indent-function 1)) + (eval . (put 'record-case 'scheme-indent-function 1)) (eval . (put 'syntax-parameterize 'scheme-indent-function 1)))) (emacs-lisp-mode . ((indent-tabs-mode . nil))) (texinfo-mode . ((indent-tabs-mode . nil) diff --git a/module/language/tree-il/fix-letrec.scm b/module/language/tree-il/fix-letrec.scm index 2cd550ae9..12c1d500a 100644 --- a/module/language/tree-il/fix-letrec.scm +++ b/module/language/tree-il/fix-letrec.scm @@ -318,7 +318,3 @@ (else x))) x))) - -;;; Local Variables: -;;; eval: (put 'record-case 'scheme-indent-function 1) -;;; End: