Ensure new arg to watchdog() in t/test.pl gets initialized

diff --git a/t/test.pl b/t/test.pl
index c43c275..2bf429c 100755 (executable)
--- a/t/test.pl
+++ b/t/test.pl
@@ -812,7 +812,7 @@ WHOA
 sub watchdog ($;$)
 {
     my $timeout = shift;
-    my $method  = shift;
+    my $method  = shift || "";
     my $timeout_msg = 'Test process timed out - terminating';
 
     # Valgrind slows perl way down so give it more time before dying.