activation: Copy account skeletons silently.

* gnu/build/activation.scm (copy-account-skeletons): Pass #:log to
'copy-recursively'.
master
Ludovic Courtès 2016-03-24 21:33:56 +01:00
parent ee03b75dfb
commit 2fa909b27b
1 changed files with 2 additions and 1 deletions

View File

@ -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)))