From e8772a9edef3fed3c592e61bbde618de197f4b53 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Sat, 24 Nov 2012 00:22:20 +0100
Subject: [PATCH] Augment `.dir-locals.el'.

* .dir-locals.el: Add more `scheme-indent-function' rules.
---
 .dir-locals.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/.dir-locals.el b/.dir-locals.el
index 364053094..ce2af7a77 100644
--- a/.dir-locals.el
+++ b/.dir-locals.el
@@ -5,7 +5,10 @@
  (c-mode          . ((c-file-style . "gnu")))
  (scheme-mode
   . ((indent-tabs-mode . nil)
-     (eval . (put 'pass-if-equal 'scheme-indent-function 2))))
+     (eval . (put 'pass-if 'scheme-indent-function 1))
+     (eval . (put 'pass-if-exception 'scheme-indent-function 2))
+     (eval . (put 'pass-if-equal 'scheme-indent-function 2))
+     (eval . (put 'with-test-prefix 'scheme-indent-function 1))))
  (emacs-lisp-mode . ((indent-tabs-mode . nil)))
  (texinfo-mode    . ((indent-tabs-mode . nil)
                      (fill-column . 72))))