mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 07:26:13 -05:00
.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>
This commit is contained in:
parent
24244f3fbf
commit
1d40e6fdd1
1 changed files with 2 additions and 2 deletions
|
@ -90,9 +90,9 @@
|
||||||
(eval . (put 'let-system 'scheme-indent-function 1))
|
(eval . (put 'let-system 'scheme-indent-function 1))
|
||||||
|
|
||||||
(eval . (put 'with-database 'scheme-indent-function 2))
|
(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 '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-savepoint 'scheme-indent-function 1))
|
||||||
(eval . (put 'call-with-retrying-savepoint 'scheme-indent-function 1))
|
(eval . (put 'call-with-retrying-savepoint 'scheme-indent-function 1))
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue