validator/httpd/cgi-bin check,1.440,1.441

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

Modified Files:
	check 
Log Message:
minor cleanup

Index: check
===================================================================
RCS file: /sources/public/validator/httpd/cgi-bin/check,v
retrieving revision 1.440
retrieving revision 1.441
diff -u -d -r1.440 -r1.441
--- check	17 Aug 2005 00:43:16 -0000	1.440
+++ check	17 Aug 2005 02:09:08 -0000	1.441
@@ -672,7 +672,6 @@
   }
 }
 
-
 if ($File->{Opt}->{Output} eq 'xml') {
   &report_xml($File);
 } elsif ($File->{Opt}->{Output} eq 'earl') {
@@ -1820,8 +1819,6 @@
     print qq(  <messages>\n);
 
     foreach my $err (@{$File->{Errors}}) {
-      chomp $err->{msg};
-
       my $offset = $File->{Offsets}->[$err->{line} - 1]->[1] + $err->{char};
       printf <<".EOF.", &ent($err->{msg});
     <msg line="$err->{line}" col="$err->{char}" offset="$offset">%s</msg>
@@ -1876,8 +1873,6 @@
     my $errnum = 0 ;
     foreach my $err (@{$File->{Errors}}) {
       ++$errnum ;
-      chomp $err->{msg};
-
       my @offsets = (
                      $File->{Offsets}->[$err->{line}    ]->[0],
                      $File->{Offsets}->[$err->{line} - 1]->[1],
@@ -1948,8 +1943,6 @@
   unless ($File->{'Is Valid'}) {
     for (my $i = 0; $i <= scalar @{$File->{Errors}}; $i++) {
       my $err = $File->{Errors}->[$i];
-      chomp $err->{msg};
-
       my @offsets = (
                      $File->{Offsets}->[$err->{line}    ]->[0],
                      $File->{Offsets}->[$err->{line} - 1]->[1],
@@ -2215,7 +2208,7 @@
   }
   
   abort_if_error_flagged($File, O_DOCTYPE);
-  $err->{msg} =~ s/^\s*//;
+
   push @{$File->{Errors}}, $err;
   
   if (defined $mess->{aux_message})

Received on Wednesday, 17 August 2005 02:09:14 UTC