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=bef36e73e4257b2ba8e59eb55661ffc51d8a620a;hpb=fb258df60473013795325e4607b24239ca9db0fc 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" };