(xpath_do): Don't be confused by the new xmlns

attribute in the html element.
2007-11-13 20:21:10 +00:00
parent 950c4fc7b3
commit 23237bea0b
1 changed files with 1 additions and 1 deletions
--- a/t/test.pl
+++ b/t/test.pl
@@ -138,7 +138,7 @@ sub test_page_negative {

 sub xpath_do {
  my ($check, $message, $page, @tests) = @_;
-  $page =~ s/^.*?<html>/<html>/s; # strip headers
+  $page =~ s/^.*?(<html)/$1/s; # strip headers
  my $page_shown = 0;
  my $parser = XML::LibXML->new();
  my $doc;