From: Matt S Trout <mst@shadowcat.co.uk>
Date: Wed, 6 Jun 2012 18:02:32 +0000 (+0000)
Subject: forward agent
X-Git-Tag: v0.001001~29
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=82964de1dc8f9d772069de31db1d62dcb90af1a7;p=scpubgit%2FObject-Remote.git

forward agent
---

diff --git a/lib/Object/Remote/Connector/SSH.pm b/lib/Object/Remote/Connector/SSH.pm
index a90270f..bf24a0a 100644
--- a/lib/Object/Remote/Connector/SSH.pm
+++ b/lib/Object/Remote/Connector/SSH.pm
@@ -8,7 +8,7 @@ with 'Object::Remote::Role::Connector::PerlInterpreter';
 
 around _perl_command => sub {
   my ($orig, $self, $target) = @_;
-  return 'ssh', $target, $self->$orig($target);
+  return 'ssh', '-A', $target, $self->$orig($target);
 };
 
 no warnings 'once';