From 9f3877d67edcf78024841bbe8291d742c861a368 Mon Sep 17 00:00:00 2001
From: mike <mike>
Date: Wed, 12 Oct 2005 11:56:27 +0000
Subject: [PATCH] Do not print to STDERR.

---
 t/1-Net-Z3950-ZOOM.t |    5 +----
 t/2-ZOOM.t           |    5 +----
 2 files changed, 2 insertions(+), 8 deletions(-)

diff --git a/t/1-Net-Z3950-ZOOM.t b/t/1-Net-Z3950-ZOOM.t
index 1aa8348..2c94f6e 100644
--- a/t/1-Net-Z3950-ZOOM.t
+++ b/t/1-Net-Z3950-ZOOM.t
@@ -1,4 +1,4 @@
-# $Id: 1-Net-Z3950-ZOOM.t,v 1.1 2005-10-12 09:48:05 mike Exp $
+# $Id: 1-Net-Z3950-ZOOM.t,v 1.2 2005-10-12 11:56:31 mike Exp $
 
 # Before `make install' is performed this script should be runnable with
 # `make test'. After `make install' it should work as `perl Net-Z3950-ZOOM.t'
@@ -46,15 +46,12 @@ if ($errcode != 0) {
 }
 
 my $n = Net::Z3950::ZOOM::resultset_size($rs);
-print STDERR "Result count: $n\n";
 
 for (my $i = 0; $i < $n; $i++) {
     my $rec = Net::Z3950::ZOOM::resultset_record($rs, $i);
     my $len = 0;
     my $data = Net::Z3950::ZOOM::record_get($rec, "render", $len);
-    print STDERR "=== record ", $i+1, " of $n ===\n", $data;
     my $raw = Net::Z3950::ZOOM::record_get($rec, "raw", $len);
-    print STDERR "--- raw version ---\n", $raw;
 }
 
 Net::Z3950::ZOOM::resultset_destroy($rs);
diff --git a/t/2-ZOOM.t b/t/2-ZOOM.t
index d7982d5..a8ce10c 100644
--- a/t/2-ZOOM.t
+++ b/t/2-ZOOM.t
@@ -1,4 +1,4 @@
-# $Id: 2-ZOOM.t,v 1.1 2005-10-12 09:48:21 mike Exp $
+# $Id: 2-ZOOM.t,v 1.2 2005-10-12 11:56:27 mike Exp $
 
 # Before `make install' is performed this script should be runnable with
 # `make test'. After `make install' it should work as `perl ZOOM.t'
@@ -32,14 +32,11 @@ my $query = '@attr 1=4 minerals';
 my $rs = $conn->search_pqf($query);
 
 my $n = $rs->size($rs);
-print STDERR "Result count: $n\n";
 
 for (my $i = 0; $i < $n; $i++) {
     my $rec = $rs->record($i);
     my $data = $rec->render();
-    print STDERR "=== record ", $i+1, " of $n ===\n", $data;
     my $raw = $rec->raw();
-    print STDERR "--- raw version ---\n", $raw;
 }
 
 $rs->destroy();
-- 
1.7.10.4