X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FProxy.pm;h=af6a902350f9421833defab820c607f8cf07e1c1;hp=8541056920c8c711d7846f31eb168ebea1bf4147;hb=dc28afe80b27f0eb81eef66e6ba554a7c1fb6e41;hpb=2065b08ba567dbf8c8370b69e3f5b2aa145efe23 diff --git a/lib/Object/Remote/Proxy.pm b/lib/Object/Remote/Proxy.pm index 8541056..af6a902 100644 --- a/lib/Object/Remote/Proxy.pm +++ b/lib/Object/Remote/Proxy.pm @@ -5,6 +5,9 @@ use strictures 1; sub AUTOLOAD { my $self = shift; (my $method) = (our $AUTOLOAD =~ /([^:]+)$/); + if ((caller(0)||'') eq 'start') { + $method = "start::${method}"; + } $self->{remote}->${\$self->{method}}($method => @_); }