From: mike <mike>
Date: Wed, 12 Apr 2006 08:49:20 +0000 (+0000)
Subject: Search AGRICOLA as well as LC and ID in the async. example.
X-Git-Tag: cpan_1_22~185
X-Git-Url: http://sru.miketaylor.org.uk/?a=commitdiff_plain;h=5f457cb130c69411228cf63ed18bc1eaa579261a;p=ZOOM-Perl-moved-to-github.git

Search AGRICOLA as well as LC and ID in the async. example.
---

diff --git a/lib/ZOOM.pod b/lib/ZOOM.pod
index fd8abbf..dbc7ae4 100644
--- a/lib/ZOOM.pod
+++ b/lib/ZOOM.pod
@@ -1,4 +1,4 @@
-# $Id: ZOOM.pod,v 1.33 2006-04-11 16:40:08 mike Exp $
+# $Id: ZOOM.pod,v 1.34 2006-04-12 08:49:20 mike Exp $
 
 use strict;
 use warnings;
@@ -1399,13 +1399,14 @@ immediately obtained.
 =back
 
 Here is a very short program (omitting all error-checking!) which
-demonstrates this process.  It parallel-searches two servers (or more
+demonstrates this process.  It parallel-searches three servers (or more
 of you add them the list), displaying the first record in the
 result-set of each server as soon as it becomes available.
 
  use ZOOM;
  @servers = ('z3950.loc.gov:7090/Voyager',
-             'bagel.indexdata.com:210/gils');
+             'bagel.indexdata.com:210/gils',
+             'agricola.nal.usda.gov:7190/Voyager');
  for ($i = 0; $i < @servers; $i++) {
      $z[$i] = new ZOOM::Connection($servers[$i], 0,
                                    async => 1, # asynchronous mode