From e23bce53cee50a9349f244c7f51a751160f9b16e Mon Sep 17 00:00:00 2001
From: mike <mike>
Date: Wed, 12 Apr 2006 08:42:35 +0000
Subject: [PATCH] Search AGRICOLA as well as LC and ID.

---
 samples/zoom/trivial-async.pl |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/samples/zoom/trivial-async.pl b/samples/zoom/trivial-async.pl
index 9a165f4..b7e6487 100644
--- a/samples/zoom/trivial-async.pl
+++ b/samples/zoom/trivial-async.pl
@@ -1,6 +1,7 @@
 use ZOOM;
 @servers = ('z3950.loc.gov:7090/Voyager',
-	    'bagel.indexdata.com:210/gils');
+	    'bagel.indexdata.com:210/gils',
+	    'agricola.nal.usda.gov:71Voyager');
 for ($i = 0; $i < @servers; $i++) {
     $z[$i] = new ZOOM::Connection($servers[$i], 0,
 				  async => 1, # asynchronous mode
-- 
1.7.10.4