X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fdetails%2Fcheck.mc;h=ea10ec9870447af0562d95920ee4909f59b30d89;hb=34fd524e6436cd1bfa7e9b8493227eadbd68cb28;hp=bf550f95a918c7e298906befa3537b73f2b9724e;hpb=86caed4a8dd3d4212fc437ba30dd4490b2175458;p=irspy-moved-to-github.git diff --git a/web/htdocs/details/check.mc b/web/htdocs/details/check.mc index bf550f9..ea10ec9 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.16 2007-01-31 16:50:38 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 "Some tests were skipped\n"; + print "$res tests were skipped\n"; +} +print "
\n"; } %perl>