~ruther/guix-local: activation: Copy account skeletons silently.

2fa909b27b4f701649ea4945eba71fc7c5f84d0b — Ludovic Courtès 10 years ago ee03b75

activation: Copy account skeletons silently.

* gnu/build/activation.scm (copy-account-skeletons): Pass #:log to
'copy-recursively'.

patch browse .tar.gz

1 files changed, 2 insertions(+), 1 deletions(-)

M gnu/build/activation.scm

M gnu/build/activation.scm => gnu/build/activation.scm +2 -1

@@ 92,7 92,8 @@
     (for-each (lambda (file)
                 (let ((target (string-append home "/" file)))
                   (copy-recursively (string-append directory "/" file)
-                                    target)
+                                    target
+                                    #:log (%make-void-port "w"))
                   (make-file-writable target)))
               files)))