From: Mike Taylor Date: Fri, 22 Sep 2006 15:39:14 +0000 (+0000) Subject: Use new API for targets(). X-Git-Tag: CPAN-v1.02~1057 X-Git-Url: http://jsfdemo.indexdata.com/cgi-bin?a=commitdiff_plain;h=2ccb62a61acf82320a01e31e666c82b9783436c8;p=irspy-moved-to-github.git Use new API for targets(). --- diff --git a/web/htdocs/details/all.mc b/web/htdocs/details/all.mc index 83064f5..c4a0f42 100644 --- a/web/htdocs/details/all.mc +++ b/web/htdocs/details/all.mc @@ -1,11 +1,10 @@ -%# $Id: all.mc,v 1.3 2006-09-20 13:19:53 mike Exp $ +%# $Id: all.mc,v 1.4 2006-09-22 15:39:14 mike Exp $ <%perl> print "IRSpy version $ZOOM::IRSpy::VERSION
\n"; my $spy = new ZOOM::IRSpy("localhost:3313/IR-Explain---1"); if (1) { # Testing all targets would take much too long for testing - my @targets = qw(bagel.indexdata.dk/gils z3950.loc.gov:7090/Voyager); - $spy->targets(join(" ", @targets)); + $spy->targets(qw(bagel.indexdata.dk/gils z3950.loc.gov:7090/Voyager)); } $spy->initialise(); my $res = $spy->check();