From 95cbf2a0cc8ccaff8a0f0efa720d96277d435368 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Tue, 21 Jun 2011 23:31:31 +0200
Subject: [PATCH] specify ssh client in SSH enviroment variable

---
 bak-git-server.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/bak-git-server.pl b/bak-git-server.pl
index dd849db..f1806a4 100755
--- a/bak-git-server.pl
+++ b/bak-git-server.pl
@@ -107,10 +107,11 @@ if ( $upgrade || $install ) {
 		system "ssh root\@$hostname apt-get install -y rsync";
 	}
 } else {
-	warn "# start ssh tunnels...";
+	my $ssh = $ENV{SSH} || 'ssh';
+	warn "# start $ssh tunnels...";
 	foreach my $host ( keys %$ssh_tunnel ) {
 		warn "## $host\n";
-		open( $ssh_tunnel->{$host}, '-|', "ssh -N root\@$host &" ) or die $!;
+		open( $ssh_tunnel->{$host}, '-|', "$ssh -N root\@$host &" ) or die $!;
 	}
 }
 
-- 
2.20.1