tribes/guix
1
0
Fork 1
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-05-28 03:51:53 +02:00
Code Activity

deduplication: Use 'dynamic-wind' when changing permissions of the parent.

Browse Source 
Suggested by Caleb Ristvedt <caleb.ristvedt@cune.org>.

* guix/store/deduplication.scm (call-with-writable-file): New procedure.
(with-writable-file): New macro.
(replace-with-link): Use it.
This commit is contained in:
Ludovic Courtès
2020-06-25 10:10:09 +02:00
parent b930f0ba21
commit d52e16d3b6
2 changed files with 17 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files
.dir-locals.el
+1
View File
@@ -37,6 +37,7 @@
(eval . (put 'with-file-lock 'scheme-indent-function 1))
(eval . (put 'with-file-lock/no-wait 'scheme-indent-function 1))
(eval . (put 'with-profile-lock 'scheme-indent-function 1))
(eval . (put 'with-writable-file 'scheme-indent-function 1))
(eval . (put 'package 'scheme-indent-function 0))
(eval . (put 'origin 'scheme-indent-function 0))