((scheme-mode
  .
  ((eval . (put 'modify-services 'scheme-indent-function 1)))))