[libanyevent-rabbitmq-perl] 141/151: Don't call goto without settin @_.

[Damyan Ivanov]

This is an automated email from the git hooks/post-receive script.

dmn pushed a commit to annotated tag debian/1.12-1
in repository libanyevent-rabbitmq-perl.

commit 9d049c55d1f85a8d72c874e90f56eac1d9544152
Author: Dave Lambley <davel at state51.co.uk>
Date:   Wed Mar 27 17:49:59 2013 +0000

    Don't call goto without settin @_.
---
 lib/AnyEvent/RabbitMQ.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lib/AnyEvent/RabbitMQ.pm b/lib/AnyEvent/RabbitMQ.pm
index 49596ba..e6e397a 100644
--- a/lib/AnyEvent/RabbitMQ.pm
+++ b/lib/AnyEvent/RabbitMQ.pm
@@ -193,10 +193,11 @@ sub _read_loop {
             if (0 == $id) {
                 if ($frame->type_id == 8) {
                     # Heartbeat, no action needs taking.
-                    goto &_read_loop;
                 }
-                return if !$self->_check_close_and_clean($frame, $close_cb,);
-                $self->{_queue}->push($frame);
+                else {
+                    return if !$self->_check_close_and_clean($frame, $close_cb,);
+                    $self->{_queue}->push($frame);
+                }
             } else {
                 my $channel = $self->{_channels}->{$id};
                 if (defined $channel) {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libanyevent-rabbitmq-perl.git