validator/httpd/cgi-bin check,1.305.2.109,1.305.2.110

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

Modified Files:
      Tag: validator-0_6_0-branch
	check 
Log Message:
Do not link to uploaded files even for "tentatively valid" and friends ones.


Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.305.2.109
retrieving revision 1.305.2.110
diff -u -d -r1.305.2.109 -r1.305.2.110
--- check	6 May 2004 22:01:27 -0000	1.305.2.109
+++ check	7 May 2004 18:11:02 -0000	1.305.2.110
@@ -1943,7 +1943,13 @@
   my $image_uri;
   my $alttext     = '';
   my $gifhw       = '';
-  my $URI         = &ent($File->{URI});
+  my $source;
+  if ($File->{'Is Upload'}) {
+    $source = qq(The uploaded file);
+  } else {
+    my $uri = &ent($File->{URI});
+    $source = qq(The document located at &lt;<a href="$uri">$uri</a>&gt;);
+  }
 
   unless ($File->{Version} eq 'unknown' or defined $File->{Tentative}) {
     if ($File->{Version} =~ /^HTML 2\.0$/) {
@@ -2011,13 +2017,6 @@
     print &daily_tip($File, $CFG->{'Tips DB'});
     &print_warnings($File) unless $File->{Opt}->{Verbose};
 
-    my $source;
-    if ($File->{'Is Upload'}) {
-      $source = qq(The uploaded file);
-    } else {
-      $source = qq(The document located at &lt;<a href="$URI">$URI</a>&gt;);
-    }
-
     print <<".EOF.";
     <p>
       $source
@@ -2045,7 +2044,7 @@
     </pre>
     <p>
     Thanks to this code, you will be able to re-validate your Web page by
-    following the link (click on the image), and we encourage you to do so 
+    following the link (click on the image), and we encourage you to do so
     every time you modify your document.
     </p>
 .EOF.
@@ -2058,8 +2057,7 @@
     &print_warnings($File);
     print <<".EOF.";
       <p>
-        The document located at
-        &lt;<a href="$URI">$URI</a>&gt;
+        $source
         was tentatively found to be Valid. That means it would validate
         as $File->{Version} if you updated the source document to match
         the options used (typically this message indicates that you used
@@ -2071,7 +2069,7 @@
     print qq(  <h2 class="valid">This document validates as the document type specified!</h2>\n);
     print <<".EOF.";
     <p>
-      The document located at &lt;<a href="$URI">$URI</a>&gt; was checked and
+      $source was checked and
       found to be valid $File->{Version}. This means that the resource in
       question identified itself as "$File->{Version}" and that we successfully
       performed a formal validation using an SGML or XML Parser (depending on

Received on Friday, 7 May 2004 14:11:33 UTC