.dir-locals.el

   1 ;;; Directory Local Variables
   2 ;;; See Info node `(emacs) Directory Variables' for more information.
   3
   4 ((auto-mode-alist
   5   ;; *.tcc files are C++ code
   6   ("\\.tcc\\'" . c++-mode))
   7  (nil ; all file types
   8   ;; No tabs
   9   (indent-tabs-mode . nil)
  10   ;; Usually use an 80-characters line length limit
  11   (fill-column . 80))
  12  (c++-mode
  13   (c-file-style . "gnu"))
  14  (scheme-mode
  15   (eval .
  16         ;; Teach Emacs about a few Scheme forms that it would
  17         ;; otherwise reformat badly.  This can be removed when
  18         ;; the patch
  19         ;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=55033
  20         ;; occurs in a released version that becomes reasonably
  21         ;; current. --JeanAS
  22         (progn
  23           "This is code run by LilyPond's .dir-locals.el to fix indentation \
  24 according to our standards.  If Emacs is warning you that this 'may not be \
  25 safe', just accept running it."
  26           (put 'match 'scheme-indent-function 1)
  27           (put 'match-lambda 'scheme-indent-function 0)
  28           (put 'match-lambda* 'scheme-indent-function 0)
  29           (put 'match-let 'scheme-indent-function 'scheme-let-indent)
  30           (put 'match-let* 'scheme-indent-function 1)
  31           (put 'match-letrec 'scheme-indent-function 1)
  32           (put 'and-let* 'scheme-indent-function 1)
  33           (put 'with-syntax 'scheme-indent-function 1)
  34           (put 'eval-when 'scheme-indent-function 1)
  35           ;; Same thing here.
  36           ;; https://debbugs.gnu.org/cgi/bugreport.cgi?bug=40869
  37           (put 'syntax-rules 'scheme-indent-function 'defun))))
  38  (texinfo-mode
  39   (fill-column . 66)))