X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FConnector%2FLocal.pm;h=6119e3ff3f612decc69f190ed526b674617e7f4f;hp=729bcd785630ec9465504baad063a3d8576b2673;hb=bef36e73e4257b2ba8e59eb55661ffc51d8a620a;hpb=fbd3b8ecbd2c9004f0e56ff1c0bc30f677a19c62 diff --git a/lib/Object/Remote/Connector/Local.pm b/lib/Object/Remote/Connector/Local.pm index 729bcd7..6119e3f 100644 --- a/lib/Object/Remote/Connector/Local.pm +++ b/lib/Object/Remote/Connector/Local.pm @@ -6,8 +6,13 @@ with 'Object::Remote::Role::Connector::PerlInterpreter'; no warnings 'once'; +BEGIN { } + push @Object::Remote::Connection::Guess, sub { - if (($_[0]||'') eq '-') { __PACKAGE__->new } + if (($_[0]||'') eq '-') { + shift(@_); + __PACKAGE__->new(@_); + } }; 1;