X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=blobdiff_plain;f=web%2Fhtdocs%2Fdetails%2Fcheck.mc;h=70e8f50f2da620e52e752092abebdd1ce4d6a3bc;hb=de9c3da6b5dbbcd6e43d8974328c0fd42f70c9d2;hp=87775a33915af30aa2878f778f80e379df710b3b;hpb=42616f8bebfc87e20d0bffce98c794abbbf7a771;p=irspy-moved-to-github.git diff --git a/web/htdocs/details/check.mc b/web/htdocs/details/check.mc index 87775a3..70e8f50 100644 --- a/web/htdocs/details/check.mc +++ b/web/htdocs/details/check.mc @@ -1,18 +1,33 @@ -%# $Id: check.mc,v 1.10 2006-10-25 09:54:16 mike Exp $ +%# $Id: check.mc,v 1.13 2006-11-18 00:09:01 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? +
+ +<%perl> +} else { + print "