X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=t%2F29-events.t;h=5c0ef4be14980b6ce6ab81d1738fa3432f04dbc4;hb=d2f35e9ee84ddd5a2e4500ccf84a5e82919cdfd5;hp=8a5d3f5dcfd84a0b5430648c1275e3fb61e938bb;hpb=35707596e9a39b36e3068f193fc061ea303dfa88;p=ZOOM-Perl-moved-to-github.git diff --git a/t/29-events.t b/t/29-events.t index 8a5d3f5..5c0ef4b 100644 --- a/t/29-events.t +++ b/t/29-events.t @@ -1,5 +1,3 @@ -# $Id: 29-events.t,v 1.2 2006-10-10 16:51:02 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 = "indexdata.com/gils"; +my $host = "z3950.indexdata.com/gils"; my $conn = create ZOOM::Connection(async => 1); eval { $conn->connect($host) }; ok(!$@, "connection to '$host'");