validator/httpd/cgi-bin check,1.334,1.335

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

Modified Files:
	check 
Log Message:
Nuke code that was intended to align source output line numbers (but was
broken in current code) and refer to the right var for sourtce output.
This closes Bug #864.


Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.334
retrieving revision 1.335
diff -u -d -r1.334 -r1.335
--- check	4 Sep 2004 21:06:17 -0000	1.334
+++ check	4 Sep 2004 22:27:43 -0000	1.335
@@ -1799,19 +1799,12 @@
   my $line = 1;
   my @source = ();
 
-  my $comment = '';
-  if ($File->{'Error Flagged'}) {
-    $comment = "<p>I have marked lines that I haven't been able to decode.</p>\n";
-  }
-
   # Remove any BOM since we're not at BOT anymore...
   $File->{Content}->[0] =
     substr $File->{Content}->[0], ($File->{BOM} ? 3 : 0); # remove BOM
 
-  my $maxhlen = length scalar @{$File->{Content}};
   for (@{$File->{Content}}) {
-    my $hline = (' ' x ($maxhlen - length("$line"))) . $line;
-    push @source, {file_source_i => $line, file_source_line => ent $hline};
+    push @source, {file_source_i => $line, file_source_line => ent $_};
     $line++;
   }
   return \@source;

Received on Saturday, 4 September 2004 22:27:45 UTC