validator/httpd/cgi-bin check,1.305.2.100,1.305.2.101

Update of /sources/public/validator/httpd/cgi-bin
In directory hutz:/tmp/cvs-serv10801

Modified Files:
      Tag: validator-0_6_0-branch
	check 
Log Message:
tweaking the code to actually display the proper link for verbose output


Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.305.2.100
retrieving revision 1.305.2.101
diff -u -d -r1.305.2.100 -r1.305.2.101
--- check	6 May 2004 15:40:57 -0000	1.305.2.100
+++ check	6 May 2004 15:49:03 -0000	1.305.2.101
@@ -1025,6 +1025,17 @@
         <legend accesskey="4">Revalidate With Options</legend>
 .EOF.
   print join '', @{&serialize_table($Form, 'header')};
+
+  # this code should not be redundant - we have the same if page is valid
+  my $thispage = $File->{Env}->{'Self URI'};
+  my $escaped_uri = uri_escape($File->{URI});
+  $thispage .= qq(?uri=$escaped_uri);
+  $thispage .= ';ss=1'      if $File->{Opt}->{'Show Source'};
+  $thispage .= ';sp=1'      if $File->{Opt}->{'Show Parsetree'};
+  $thispage .= ';noatt=1'   if $File->{Opt}->{'No Attributes'};
+  $thispage .= ';outline=1' if $File->{Opt}->{'Outline'};
+  $thispage .= ';No200=1'   if $File->{Opt}->{'No200'};
+  # end redundant code
   print <<".EOF.";
       <p><a href='http://qa-dev.w3.org/wmvs/0.6/docs/users.html#Options'>Help</a> on the options is available. 
 	<a href="$thispage;verbose=1">Verbose output</a> will give you explanations in addition to the error messages.);

Received on Thursday, 6 May 2004 11:49:42 UTC