about summary refs log tree commit diff
path: root/perl
diff options
context:
space:
mode:
authorShea Levy <shea@shealevy.com>2012-03-29T16·58+0200
committerEelco Dolstra <eelco.dolstra@logicblox.com>2012-04-13T12·29+0200
commit34a85c5405a228860a7bbe77239fb0204bf6952c (patch)
tree599c02c28182d997e2fe33473b051e508330577e /perl
parent055e803851e73bb94d341c3b4f25f52be167fef7 (diff)
nix-copy-closure: Move the progressViewer directly adjacent to the ssh call so that network progress is what's measured
Diffstat (limited to 'perl')
-rw-r--r--perl/lib/Nix/CopyClosure.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl/lib/Nix/CopyClosure.pm b/perl/lib/Nix/CopyClosure.pm
index 4794fed9d0..79c6dfcccb 100644
--- a/perl/lib/Nix/CopyClosure.pm
+++ b/perl/lib/Nix/CopyClosure.pm
@@ -35,7 +35,7 @@ sub copyTo {
     if (scalar @missing > 0) {
         print STDERR "copying ", scalar @missing, " missing paths to ‘$sshHost’...\n";
         unless ($dryRun) {
-            open SSH, "| $progressViewer $compressor ssh $sshHost @{$sshOpts} '$decompressor nix-store --import' > /dev/null" or die;
+            open SSH, "| $compressor $progressViewer ssh $sshHost @{$sshOpts} '$decompressor nix-store --import' > /dev/null" or die;
             exportPaths(fileno(SSH), $sign, @missing);
             close SSH or die "copying store paths to remote machine `$sshHost' failed: $?";
         }