Add new test scripts and generally improve code coverage of tests.

[ircu2.10.12-pk.git] / ircd / test / test-driver.pl

diff --git a/ircd/test/test-driver.pl b/ircd/test/test-driver.pl
index 7ee09cde50b2c45f46a548c711ffb63ca129c9e0..871d6e0805217a20de9dd3d247dce3b57731e352 100755 (executable)
--- a/ircd/test/test-driver.pl
+++ b/ircd/test/test-driver.pl
@@ -103,8 +103,11 @@ POE::Session->create(inline_states =>
                       irc_nick => sub {},
                       irc_part => sub {},
                       irc_ping => sub {},
+                      irc_pong => sub {},
+                      irc_rpong => sub {},
                       irc_quit => sub {},
                       irc_topic => sub {},
+                      irc_plugin_add => sub {},
                       irc_error => \&irc_error,
                       irc_disconnected => \&irc_disconnected,
                       irc_socketerr => \&irc_socketerr,
@@ -316,7 +319,8 @@ sub drv_default {
     }
     return undef;
   }
-  print "ERROR: Unexpected event $state to test driver (from ".$sender->ID.")\n";
+  print "ERROR: Unexpected event $state to test driver (from ".$sender->ID.")\n"
+    unless $state eq '_signal';
   return undef;
 }