From: mike <mike>
Date: Fri, 7 Apr 2006 12:37:26 +0000 (+0000)
Subject: Brief element-set.
X-Git-Tag: cpan_1_22~203
X-Git-Url: http://lists.indexdata.com/cgi-bin?a=commitdiff_plain;h=441941c76e14011b86ec00e4e99fd2de43163dcd;p=ZOOM-Perl-moved-to-github.git

Brief element-set.
---

diff --git a/samples/net-z3950-zoom/zoomtst3.pl b/samples/net-z3950-zoom/zoomtst3.pl
index 16c1440..fa32247 100644
--- a/samples/net-z3950-zoom/zoomtst3.pl
+++ b/samples/net-z3950-zoom/zoomtst3.pl
@@ -1,4 +1,4 @@
-# $Id: zoomtst3.pl,v 1.5 2006-04-07 12:15:03 mike Exp $
+# $Id: zoomtst3.pl,v 1.6 2006-04-07 12:37:26 mike Exp $
 #
 # See ../README for a description of this program.
 # perl -I../../blib/lib -I../../blib/arch zoomtst3.pl <t1> [...] <tN> <query>
@@ -23,7 +23,7 @@ Net::Z3950::ZOOM::options_set($o, count => 10);
 
 # Preferred record syntax
 Net::Z3950::ZOOM::options_set($o, preferredRecordSyntax => "usmarc");
-Net::Z3950::ZOOM::options_set($o, elementSetName => "F");
+Net::Z3950::ZOOM::options_set($o, elementSetName => "B");
 
 # Connect to all targets: options are the same for all of them
 for (my $i = 0; $i < $n; $i++) {