X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=bin%2Firspy.pl;h=22765e430d5f247decfe02198a184a628356214c;hp=02f5c2506b665921745469901e5e18ce3a47e74d;hb=97c17ced44552e6f88ace4cc633650c29cb37195;hpb=5dd9c46e9bd2d6bd99a0d2aa728ed5430aeec3e8 diff --git a/bin/irspy.pl b/bin/irspy.pl index 02f5c25..22765e4 100755 --- a/bin/irspy.pl +++ b/bin/irspy.pl @@ -1,9 +1,9 @@ #!/usr/bin/perl -w -# $Id: irspy.pl,v 1.18 2007-01-24 09:28:02 mike Exp $ +# $Id: irspy.pl,v 1.21 2007-02-22 11:49:13 mike Exp $ # # Run like this: -# YAZ_LOG=irspy,irspy_test perl -I ../lib irspy.pl -t Quick localhost:8018/IR-Explain---1 bagel.indexdata.dk/gils z3950.loc.gov:7090/Voyager bagel.indexdata.dk:210/marc +# YAZ_LOG=irspy,irspy_test IRSPY_SAVE_XML=1 perl -I../lib irspy.pl -t Quick localhost:8018/IR-Explain---1 z3950.loc.gov:7090/Voyager bagel.indexdata.dk/gils bagel.indexdata.dk:210/marc # Available log-levels are as follows: # irspy -- high-level application logging # irspy_debug -- low-level debugging (not very interesting) @@ -37,7 +37,7 @@ $spy->targets(@targets) if @targets; $spy->initialise(); my $res = $spy->check($opts{t}); if ($res == 0) { - print "All tests were run\n"; + print "All tests were attempted\n"; } else { print "$res tests were skipped\n"; }