X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=t%2F29-events.t;h=5c0ef4be14980b6ce6ab81d1738fa3432f04dbc4;hb=968db5559fc32509c71c3856edc7d6c37eb4a5cb;hp=dabd13657fe3052640fe6867686079609093c2d8;hpb=ae5c2b81234af64a77295188f6fc90ede3589723;p=ZOOM-Perl-moved-to-github.git diff --git a/t/29-events.t b/t/29-events.t index dabd136..5c0ef4b 100644 --- a/t/29-events.t +++ b/t/29-events.t @@ -1,5 +1,3 @@ -# $Id: 29-events.t,v 1.3 2006-11-02 17:04:36 mike Exp $ - # Before `make install' is performed this script should be runnable with # `make test'. After `make install' it should work as `perl 19-events.t' @@ -14,7 +12,7 @@ ok(ZOOM::event_str(ZOOM::Event::CONNECT) eq "connect", my($errcode, $errmsg, $addinfo) = (undef, "dummy", "dummy"); -my $host = "bagel.indexdata.com/gils"; +my $host = "z3950.indexdata.com/gils"; my $conn = create ZOOM::Connection(async => 1); eval { $conn->connect($host) }; ok(!$@, "connection to '$host'");