- From: Terje Bless <link@dev.w3.org>
- Date: Sat, 04 Sep 2004 22:27:45 +0000
- To: www-validator-cvs@w3.org
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