From 555c87c52f007522ffdc3995d402cfe3dfefbf5e Mon Sep 17 00:00:00 2001 From: Jonathan Hall Date: Wed, 17 Sep 2014 21:08:34 -0500 Subject: [PATCH] Silence a noisy test by passing an expected data type. --- t/qpsmtpd.t | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/t/qpsmtpd.t b/t/qpsmtpd.t index 56448cb..41fd235 100644 --- a/t/qpsmtpd.t +++ b/t/qpsmtpd.t @@ -109,11 +109,11 @@ sub __run_continuation { } sub __hook_responder { - my ($code, $msg) = $qp->hook_responder('test-hook', ['test code','test mesg']); - is($code, 'test code', "hook_responder, code"); + my ($code, $msg) = $qp->hook_responder('test-hook', [OK,'test mesg']); + is($code, OK, "hook_responder, code"); is($msg, 'test mesg', "hook_responder, test msg"); - ($code, $msg) = $smtpd->hook_responder('connect', ['test code','test mesg']); + ($code, $msg) = $smtpd->hook_responder('connect', [OK,'test mesg']); is($code->[0], 220, "hook_responder, code"); ok($code->[1] =~ /ESMTP qpsmtpd/, "hook_responder, message: ". $code->[1]);