summaryrefslogtreecommitdiff
path: root/.dir-locals.el
diff options
context:
space:
mode:
authorCaleb Ristvedt <caleb.ristvedt@cune.org>2020-06-24 01:00:40 -0500
committerLudovic Courtès <ludo@gnu.org>2020-09-14 10:51:26 +0200
commit1d40e6fdd1898d94d9611b01ebd893aab72dec54 (patch)
treedd4f3cf2443f6bd57c01882c7f0ab2444641898a /.dir-locals.el
parent24244f3fbff8cd107162803ab9c4392912ce6546 (diff)
.dir-locals.el: fix call-with-{retrying-}transaction indenting.
* .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>
Diffstat (limited to '.dir-locals.el')
-rw-r--r--.dir-locals.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/.dir-locals.el b/.dir-locals.el
index 7f966704c7..5954e313f2 100644
--- a/.dir-locals.el
+++ b/.dir-locals.el
@@ -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))