Events check: allow for multiple Connect events
[ZOOM-Perl-moved-to-github.git] / t / 29-events.t
index 5c0ef4b..f93739b 100644 (file)
@@ -27,7 +27,7 @@ ok(1, "huge array reference argument rejected");
 
 # See comments in 19-event.t
 assert_event_stream($conn, 
-                   ZOOM::Event::CONNECT,
+                   -(ZOOM::Event::CONNECT),
                    ZOOM::Event::SEND_APDU,
                    ZOOM::Event::SEND_DATA,
                    ZOOM::Event::RECV_DATA,