about summary refs log tree commit diff
path: root/perl
diff options
context:
space:
mode:
authorEelco Dolstra <eelco.dolstra@logicblox.com>2014-07-11T22·09+0200
committerEelco Dolstra <eelco.dolstra@logicblox.com>2014-07-11T22·09+0200
commita00a98548e994d1ea258e14793c7bcd8ea56cfdf (patch)
tree8a82b9badb4f2eadcad1461567b0aa3c84dd9b75 /perl
parent838138c5c4d21a207f3579c4f743698bd6dbb6b1 (diff)
build-remote.pl: Fix build log
Diffstat (limited to 'perl')
-rw-r--r--perl/lib/Nix/SSH.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/perl/lib/Nix/SSH.pm b/perl/lib/Nix/SSH.pm
index c8792043c20c..84bff5c7850c 100644
--- a/perl/lib/Nix/SSH.pm
+++ b/perl/lib/Nix/SSH.pm
@@ -107,11 +107,13 @@ sub writeStrings {
 
 
 sub connectToRemoteNix {
-    my ($sshHost, $sshOpts) = @_;
+    my ($sshHost, $sshOpts, $extraFlags) = @_;
+
+    $extraFlags ||= "";
 
     # Start ‘nix-store --serve’ on the remote host.
     my ($from, $to);
-    my $pid = open2($from, $to, "ssh $sshHost @{$sshOpts} nix-store --serve --write");
+    my $pid = open2($from, $to, "ssh $sshHost @{$sshOpts} nix-store --serve --write $extraFlags");
 
     # Do the handshake.
     my $SERVE_MAGIC_1 = 0x390c9deb; # FIXME