X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fdetails%2Fcheck.mc;h=b2dd433e1857f4eca6d5293e32132b511d0aa99f;hb=0e0292a11cf43e9b1405c05b69886044d97e29d2;hp=57572150650004955a3640f690cb42adf84c3669;hpb=e97d4090984c10e7e754e8007efe7d3c65ff35ca;p=irspy-moved-to-github.git diff --git a/web/htdocs/details/check.mc b/web/htdocs/details/check.mc index 5757215..b2dd433 100644 --- a/web/htdocs/details/check.mc +++ b/web/htdocs/details/check.mc @@ -1,30 +1,48 @@ -%# $Id: check.mc,v 1.8 2006-10-11 16:42:50 mike Exp $ +%# $Id: check.mc,v 1.17 2007-04-18 15:32:43 mike Exp $ <%args> @id +$test => "Quick" +$really => 0 %args> <%perl> my $allTargets = (@id == 1 && $id[0] eq ""); +if ($allTargets && !$really) { +%perl> +
+ Testing all the targets is a very slow process. + Are you sure you want to do this? +
+
+ Yes: Quick Test
+ Yes: Full Test
+ No
+
\n"; if ($res == 0) { - print "All tests were run\n"; + print "All tests were attempted\n"; } else { print "$res tests were skipped\n"; } print "
\n"; +} %perl>