X-Git-Url: http://jsfdemo.indexdata.com/?a=blobdiff_plain;f=t%2F2-ZOOM.t;h=fcf7619b2ecff2f50ba23bd65b0c0e126b47dfb0;hb=53717af9568881db25df238b84b8465d8b649256;hp=cba0e4d2eca3b738b75a053b1b57d95c15c3692f;hpb=7c8515f98de6cb1298cf07901c1f7c5e835e0fac;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'");