.dir-locals.el: fix call-with-{retrying-}transaction indenting.
authorCaleb Ristvedt <caleb.ristvedt@cune.org>
Wed, 24 Jun 2020 06:00:40 +0000 (01:00 -0500)
committerLudovic Courtès <ludo@gnu.org>
Mon, 14 Sep 2020 08:51:26 +0000 (10:51 +0200)
* .dir-locals.el (call-with-transaction, call-with-retrying-transaction):
  change scheme-indent-function property from 2 to 1.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
.dir-locals.el

index 7f96670..5954e31 100644 (file)
@@ -90,9 +90,9 @@
    (eval . (put 'let-system 'scheme-indent-function 1))
 
    (eval . (put 'with-database 'scheme-indent-function 2))
-   (eval . (put 'call-with-transaction 'scheme-indent-function 2))
+   (eval . (put 'call-with-transaction 'scheme-indent-function 1))
    (eval . (put 'with-statement 'scheme-indent-function 3))
-   (eval . (put 'call-with-retrying-transaction 'scheme-indent-function 2))
+   (eval . (put 'call-with-retrying-transaction 'scheme-indent-function 1))
    (eval . (put 'call-with-savepoint 'scheme-indent-function 1))
    (eval . (put 'call-with-retrying-savepoint 'scheme-indent-function 1))