X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=blobdiff_plain;ds=sidebyside;f=samples%2Fzoom%2Ftrivial-async.pl;h=43cea2cd7e319f6af1386432f5d647809e495101;hb=ad4e6c1bc9f1a5360d50e28e23cdae10c70d5501;hp=9a165f4fd4c60083d1a8b0062cc7d2d803376dfa;hpb=402083a162a0cab5481d44cb1d63d820dae85f4c;p=ZOOM-Perl-moved-to-github.git

diff --git a/samples/zoom/trivial-async.pl b/samples/zoom/trivial-async.pl
index 9a165f4..43cea2c 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:7190/Voyager');
 for ($i = 0; $i < @servers; $i++) {
     $z[$i] = new ZOOM::Connection($servers[$i], 0,
 				  async => 1, # asynchronous mode