X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=web%2Fhtdocs%2Fdetails%2Fcheck.mc;h=b4c7dc3b7818cf6c5cf74c23c4781d14361f8414;hp=bf550f95a918c7e298906befa3537b73f2b9724e;hb=5dd9c46e9bd2d6bd99a0d2aa728ed5430aeec3e8;hpb=ea809b72467ab402aeaa048b94c773e5d0818e5d diff --git a/web/htdocs/details/check.mc b/web/htdocs/details/check.mc index bf550f9..b4c7dc3 100644 --- a/web/htdocs/details/check.mc +++ b/web/htdocs/details/check.mc @@ -1,26 +1,48 @@ -%# $Id: check.mc,v 1.4 2006-09-23 07:13:43 mike Exp $ +%# $Id: check.mc,v 1.15 2007-01-24 09:28:02 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 run\n"; } else { - print "Some tests were skipped\n"; + print "$res tests were skipped\n"; +} +print "
\n"; } %perl>