X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FConnection.pm;h=ed78e0e09854c66b656050cff711f5bb0159581a;hp=21bcec455061ad756157128644a3f72fc3b4d36b;hb=fbd3b8ecbd2c9004f0e56ff1c0bc30f677a19c62;hpb=12fb4a80d68ad14c18a35f60cc6d8a671f728ac9 diff --git a/lib/Object/Remote/Connection.pm b/lib/Object/Remote/Connection.pm index 21bcec4..ed78e0e 100644 --- a/lib/Object/Remote/Connection.pm +++ b/lib/Object/Remote/Connection.pm @@ -119,7 +119,9 @@ sub new_from_spec { my ($class, $spec) = @_; return $spec if blessed $spec; foreach my $poss (do { our @Guess }) { - if (my $obj = $poss->($spec)) { return $obj } + if (my $conn = $poss->($spec)) { + return $conn->maybe::start::connect; + } } die "Couldn't figure out what to do with ${spec}"; }