X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=blobdiff_plain;f=samples%2Fzoom%2Ftrivial-async.pl;h=1f588be26afbc2863d7b2bec65690c7a351a3174;hb=240063c187d8f615646214c76a3c920de7d05bb4;hp=b7e6487e6911701bcb40ddf7de666a723b652313;hpb=e23bce53cee50a9349f244c7f51a751160f9b16e;p=ZOOM-Perl-moved-to-github.git

diff --git a/samples/zoom/trivial-async.pl b/samples/zoom/trivial-async.pl
index b7e6487..1f588be 100644
--- a/samples/zoom/trivial-async.pl
+++ b/samples/zoom/trivial-async.pl
@@ -1,7 +1,7 @@
 use ZOOM;
 @servers = ('z3950.loc.gov:7090/Voyager',
-	    'bagel.indexdata.com:210/gils',
-	    'agricola.nal.usda.gov:71Voyager');
+	    'z3950.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