aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/compositor/export.lux
diff options
context:
space:
mode:
authorEduardo Julian2020-12-10 22:29:32 -0400
committerEduardo Julian2020-12-10 22:29:32 -0400
commit9af671a34728b35c48bff2ba163c371dc5084946 (patch)
treeec35f32b8f0cabec702708e0e3cc4462b587c752 /stdlib/source/program/compositor/export.lux
parentd747aada2d6df6538d0a88d70169f3757aef50af (diff)
Render XML to text in an indented form for human readability.
Diffstat (limited to 'stdlib/source/program/compositor/export.lux')
-rw-r--r--stdlib/source/program/compositor/export.lux5
1 files changed, 4 insertions, 1 deletions
diff --git a/stdlib/source/program/compositor/export.lux b/stdlib/source/program/compositor/export.lux
index bc2ced5a3..b649f333b 100644
--- a/stdlib/source/program/compositor/export.lux
+++ b/stdlib/source/program/compositor/export.lux
@@ -54,7 +54,10 @@
source-code (tar.content source-code)]
(wrap (#tar.Normal [path
(instant.from-millis +0)
- tar.none
+ ($_ tar.and
+ tar.read-by-owner tar.write-by-owner
+ tar.read-by-group tar.write-by-group
+ tar.read-by-other)
..no-ownership
source-code])))))
(\ try.monad map row.from-list)