X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FObject%2FRemote%2FConnector%2FLocal.pm;h=838bd5d16258dad64780842a6fb8555f27b30b9b;hb=572a9a00cec239943f92157ec39c44398aad137f;hp=ce96d9a12bb142b39dd205219fa5364d07eaed47;hpb=a9fdb55e205b30cfca1cee5f61ab0f1107f750d1;p=scpubgit%2FObject-Remote.git diff --git a/lib/Object/Remote/Connector/Local.pm b/lib/Object/Remote/Connector/Local.pm index ce96d9a..838bd5d 100644 --- a/lib/Object/Remote/Connector/Local.pm +++ b/lib/Object/Remote/Connector/Local.pm @@ -4,8 +4,15 @@ use Moo; with 'Object::Remote::Role::Connector::PerlInterpreter'; +no warnings 'once'; + +BEGIN { } + push @Object::Remote::Connection::Guess, sub { - if (($_[0]||'') eq '-') { __PACKAGE__->new->connect } + if (($_[0]||'') eq '-') { + shift(@_); + __PACKAGE__->new(@_); + } }; 1;