diff options
Diffstat (limited to 'perl/lib')
| -rw-r--r-- | perl/lib/Nix/SSH.pm | 6 |
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 |