X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=t%2FZOOM-IRSpy.t;h=daf415ffc542a93f249a4a28a3668f49bbcc9a06;hp=e9bd6123b1da657598a50ac8c7595274a37152b5;hb=06864c9e99435d22aec6ab5328bfe6806e3df4d1;hpb=502d762f3abbcab293a03236406ae809c80ef9df diff --git a/t/ZOOM-IRSpy.t b/t/ZOOM-IRSpy.t index e9bd612..daf415f 100644 --- a/t/ZOOM-IRSpy.t +++ b/t/ZOOM-IRSpy.t @@ -1,6 +1,6 @@ # change 'tests => 1' to 'tests => last_test_to_print'; -use Test::More qw(no_plan); +use Test::More tests => 3; BEGIN { use_ok('ZOOM::IRSpy'); @@ -17,7 +17,7 @@ my $irspy_to_zeerex_xsl = 'xsl/irspy2zeerex.xsl'; $ZOOM::IRSpy::irspy_to_zeerex_xsl = $irspy_to_zeerex_xsl if $irspy_to_zeerex_xsl; -my $dbname = 'localhost:8018/IR-Explain---1'; +my $dbname = ZOOM::IRSpy::connect_to_registry(); my $spy = new ZOOM::IRSpy( $dbname, "admin", "fruitbat" ); isa_ok( $spy, 'ZOOM::IRSpy' ); @@ -25,7 +25,6 @@ isa_ok( $spy, 'ZOOM::IRSpy' ); # test for failure if template not exists eval { $ZOOM::IRSpy::irspy_to_zeerex_xsl = '/nonexist'; - $ZOOM::IRSpy::debug = 1; $ZOOM::IRSpy::xslt_max_depth = 100; $spy = new ZOOM::IRSpy( $dbname, "admin", "fruitbat" ); };