From de83660dd386b73957fe4ad2dc08ce5b8e1f0e7f Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Wed, 2 Sep 2020 23:55:20 +0200 Subject: ssh: Fix regression in 'send-files'. Regression introduced in b03267df6d5ec44e9617b6aab0df14a2e79f822e. The (take files 20) is a leftover from testing session. * guix/ssh.scm (send-files): Fix value for 'missing'. --- guix/ssh.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'guix') diff --git a/guix/ssh.scm b/guix/ssh.scm index 5f94528520..5f05733f12 100644 --- a/guix/ssh.scm +++ b/guix/ssh.scm @@ -466,7 +466,7 @@ (define* (send-files local files remote ;; Compute the subset of FILES missing on SESSION and send them. (let* ((files (if recursive? (requisites local files) files)) (session (channel-get-session (store-connection-socket remote))) - (missing (take files 20) #;(inferior-remote-eval + (missing (inferior-remote-eval `(begin (use-modules (guix) (srfi srfi-1) (srfi srfi-26)) -- cgit v1.2.3