diff options
| author | Caleb Ristvedt <caleb.ristvedt@cune.org> | 2020-06-24 01:00:40 -0500 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2020-09-14 10:51:26 +0200 |
| commit | 1d40e6fdd1898d94d9611b01ebd893aab72dec54 (patch) | |
| tree | dd4f3cf2443f6bd57c01882c7f0ab2444641898a /.dir-locals.el | |
| parent | 24244f3fbff8cd107162803ab9c4392912ce6546 (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.el | 4 |
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)) |