X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=t%2F2-ZOOM.t;fp=t%2F2-ZOOM.t;h=fcf7619b2ecff2f50ba23bd65b0c0e126b47dfb0;hb=7e9c44e87b2950ef16bb530b9ec799cd022934a5;hp=cba0e4d2eca3b738b75a053b1b57d95c15c3692f;hpb=a093850375464520c98525423b6222f89e7f7b1a;p=ZOOM-Perl-moved-to-github.git diff --git a/t/2-ZOOM.t b/t/2-ZOOM.t index cba0e4d..fcf7619 100644 --- a/t/2-ZOOM.t +++ b/t/2-ZOOM.t @@ -1,4 +1,4 @@ -# $Id: 2-ZOOM.t,v 1.9 2005-11-16 16:25:02 mike Exp $ +# $Id: 2-ZOOM.t,v 1.10 2006-10-10 16:50:38 mike Exp $ # Before `make install' is performed this script should be runnable with # `make test'. After `make install' it should work as `perl 2-ZOOM.t' @@ -25,8 +25,7 @@ ok(!$@, "connection to '$host'"); $conn->destroy(); ok(1, "destroyed connection"); -my $options = new ZOOM::Options(); -eval { $conn = create ZOOM::Connection($options) }; +eval { $conn = create ZOOM::Connection() }; ok(!$@, "unconnected connection object created"); eval { $conn->connect($host, 0) }; ok(!$@, "delayed connection to '$host'");