-# $Id: ZOOM.pod,v 1.37 2006-06-15 15:42:30 mike Exp $
+# $Id: ZOOM.pod,v 1.38 2006-11-02 17:48:25 mike Exp $
use strict;
use warnings;
use ZOOM;
@servers = ('z3950.loc.gov:7090/Voyager',
- 'bagel.indexdata.com:210/gils',
+ '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,