Changeset 7740
- Timestamp:
- 06/12/10 20:11:42 (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/UnitTestContrib/test/unit/HTMLValidationTests.pm
r7739 r7740 180 180 181 181 $this->assert($responseText); 182 $this->assert_matches(qr/^1?$/, $result, "$SCRIPT_NAME returned '$result'") 183 if defined $result; 184 $this->assert_equals('', $stderr, "$SCRIPT_NAME errored: '$stderr'") 185 if defined $stderr; 182 $this->assert_matches( qr/^1?$/, $result, 183 "$SCRIPT_NAME returned '$result'" ) 184 if defined $result; 185 $this->assert_equals( '', $stderr, "$SCRIPT_NAME errored: '$stderr'" ) 186 if defined $stderr; 186 187 187 188 # Remove CGI header … … 189 190 my ( $header, $body ); 190 191 if ( $responseText =~ /^(.*?)$CRLF$CRLF(.+)$/s 191 or ($stdout && $stdout =~ /^(.*?)$CRLF$CRLF(.+)$/s) ) { 192 or ( $stdout && $stdout =~ /^(.*?)$CRLF$CRLF(.*)$/s ) ) 193 { 192 194 193 195 # Response can be in stdout if the request is split, like for
Note: See TracChangeset
for help on using the changeset viewer.
