test return values of datasend and dataend

1 files changed, 4 insertions, 4 deletions

diff --git a/t/datasend.t b/t/datasend.t
index 5c785ba..0786709 100644
--- a/t/datasend.t
+++ b/t/datasend.t
@@ -30,16 +30,16 @@ BEGIN {
 (my $libnet_t = __FILE__) =~ s/datasend.t/libnet_t.pl/;
 require $libnet_t or die;
 
-print "1..15\n";
+print "1..51\n";
 
 sub check {
   my $expect = pop;
   my $cmd = Foo->new;
-  $cmd->datasend unless @_;
+  ok($cmd->datasend, 'datasend') unless @_;
   foreach my $line (@_) {
-    $cmd->datasend($line);
+    ok($cmd->datasend($line), 'datasend');
   }
-  $cmd->dataend;
+  ok($cmd->dataend, 'dataend');
   is(
     unpack("H*",$cmd->output),
     unpack("H*",$expect)