diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2020-09-02 23:55:20 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2020-09-02 23:59:24 +0200 |
| commit | de83660dd386b73957fe4ad2dc08ce5b8e1f0e7f (patch) | |
| tree | 1811aa4609dd88907ab3551b036a16aed40e6372 | |
| parent | 39bb2941707fececd087ee771665112f35ea6548 (diff) | |
| download | guix-de83660dd386b73957fe4ad2dc08ce5b8e1f0e7f.tar.gz | |
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'.
| -rw-r--r-- | guix/ssh.scm | 2 |
1 files changed, 1 insertions, 1 deletions
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 @@ Return the list of store items actually sent." ;; 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)) |