Check for return value when using LibZMQ2 backend as well

lestrrat-p5 · Oct 28, 2014 · b90d578 · b90d578
1 parent bee31f1
commit b90d578
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/ZMQ/lib/ZMQ/Socket.pm b/ZMQ/lib/ZMQ/Socket.pm
@@ -66,10 +66,10 @@ BEGIN {
         $methods{recv} = sub {
             my $self = shift;
             my $msg  = ZMQ::call( "zmq_recv", $self->{_socket}, @_ );
-            if ( $msg ) {
+            if ( ref $msg && eval { $msg->isa('ZMQ::LibZMQ2::Message') } ) {
                 return ZMQ::Message->_wrap( $msg );
             }
-            return $msg;
+            return;
         };
         $methods{send} = sub {
             my $self = shift;