X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FHandle.pm;h=782ddf678819721ac07f89b90e2167719f84bbd6;hp=8e01b85df0c4521aa756c98803351a268a73ca0b;hb=55c0d0209fa9d9265ff178f54ae9fe5fdddef3c1;hpb=5ccce2d5c1fb651f83c73c811069003e4a591a53 diff --git a/lib/Object/Remote/Handle.pm b/lib/Object/Remote/Handle.pm index 8e01b85..782ddf6 100644 --- a/lib/Object/Remote/Handle.pm +++ b/lib/Object/Remote/Handle.pm @@ -55,7 +55,7 @@ sub call { my ($self, $method, @args) = @_; my $w = wantarray; my $id = $self->id; - + $method = "start::${method}" if (caller(0)||'') eq 'start'; log_trace { "call('$method') has been invoked on remote handle '$id'; creating future" };