((scheme-mode
  (eval . (progn
            (put 'with-accessors 'scheme-indent-function 1)))))