X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=t%2F14-sorting.t;h=ea74c6c80415fe8cd41fa562490bcae6c2402dd9;hb=e693b63bf2210534b6c48a03b797cc7d2eeef890;hp=30debe83e8cb877f6cfc6e5e51b2a4b63ee82145;hpb=93ecc02aa84476d2b3b154e61624001f309819bc;p=ZOOM-Perl-moved-to-github.git diff --git a/t/14-sorting.t b/t/14-sorting.t index 30debe8..ea74c6c 100644 --- a/t/14-sorting.t +++ b/t/14-sorting.t @@ -1,4 +1,4 @@ -# $Id: 14-sorting.t,v 1.6 2005-11-18 17:53:53 mike Exp $ +# $Id: 14-sorting.t,v 1.8 2006-11-02 17:48:26 mike Exp $ # Before `make install' is performed this script should be runnable with # `make test'. After `make install' it should work as `perl 14-sorting.t' @@ -12,7 +12,7 @@ BEGIN { use_ok('Net::Z3950::ZOOM') }; my($errcode, $errmsg, $addinfo) = (undef, "dummy", "dummy"); -my $host = "indexdata.com/gils"; +my $host = "z3950.indexdata.com/gils"; my $conn = Net::Z3950::ZOOM::connection_new($host, 0); $errcode = Net::Z3950::ZOOM::connection_error($conn, $errmsg, $addinfo); ok($errcode == 0, "connection to '$host'");