Permalink
Browse files

Fix comparison of documents in test

Seems that newer version of XML::LibXML overload stringification.
  • Loading branch information...
1 parent 6ee8efd commit 4f1b4cdd7170ded18a623fd2b1c79119b23863b8 @nwellnhof committed Aug 18, 2012
Showing with 4 additions and 4 deletions.
  1. +2 −2 t/xml.t
  2. +2 −2 t/xsl.t
View
@@ -37,11 +37,11 @@ cmp_deeply($deps, {
}, 'dependencies');
$cached_doc = $cache->parse_file($filename);
-is($cached_doc, $doc, 'cached doc');
+is(int($cached_doc), int($doc), 'cached doc');
$ref = File::Touch->new(mtime => $time, no_create => 1);
$ref->touch($entity_filename);
my $new_doc = $cache->parse_file($filename);
-isnt($new_doc, $doc, 'new doc');
+isnt(int($new_doc), int($doc), 'new doc');
View
@@ -21,7 +21,7 @@ my $cached_rec = $cache->{cache}{$filename};
isa_ok($cached_rec, 'ARRAY');
my ($cached_ss, $deps) = @$cached_rec;
-is($cached_ss, $stylesheet, 'cached stylesheet');
+is(int($cached_ss), int($stylesheet), 'cached stylesheet');
my $number = re(qr/^\d+\z/);
my $attrs = [ $number, $number ];
@@ -42,5 +42,5 @@ $ref = File::Touch->new(mtime => $time, no_create => 1);
$ref->touch($import_filename);
my $new_ss = $cache->parse_stylesheet_file($filename);
-isnt($new_ss, $stylesheet, 'new stylesheet');
+isnt(int($new_ss), int($stylesheet), 'new stylesheet');

0 comments on commit 4f1b4cd

Please sign in to comment.