This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Tarantool -- an efficient key/value data store".

The branch perl-iproto-async has been updated
       via  d946a7968f7abfe519a0aae5fda22b489e0bde15 (commit)
      from  4913bf2dc614cd3b77baba9d49abcd4523fc3a0f (commit)

Summary of changes:
 .../client/perl/lib/MR/IProto/Connection/Sync.pm   |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

commit d946a7968f7abfe519a0aae5fda22b489e0bde15
Author: Aleksey Mashanov <[email protected]>
Date:   Mon Mar 21 17:17:44 2011 +0300

    Fix size

diff --git a/mod/silverbox/client/perl/lib/MR/IProto/Connection/Sync.pm 
b/mod/silverbox/client/perl/lib/MR/IProto/Connection/Sync.pm
index 7094cad..8328cc7 100644
--- a/mod/silverbox/client/perl/lib/MR/IProto/Connection/Sync.pm
+++ b/mod/silverbox/client/perl/lib/MR/IProto/Connection/Sync.pm
@@ -219,7 +219,7 @@ sub _handle_error {
     }
     $server->active(0);
     my $sent = $self->_sent;
-    my @sent = splice @$sent, 0, $#$sent;
+    my @sent = splice @$sent, 0, scalar @$sent;
     $server->_recv_finished($sync, undef, undef, $error);
     $callback->(undef, undef, $error);
     foreach my $args (@sent) {

-- 
Tarantool -- an efficient key/value data store

_______________________________________________
Mailing list: https://launchpad.net/~tarantool-developers
Post to     : [email protected]
Unsubscribe : https://launchpad.net/~tarantool-developers
More help   : https://help.launchpad.net/ListHelp

Reply via email to