Test::Differences less context = more comprehend

[dbsrgits/SQL-Translator.git] / t / 17sqlfxml-producer.t

diff --git a/t/17sqlfxml-producer.t b/t/17sqlfxml-producer.t
index 7989e35..85042ce 100644 (file)
--- a/t/17sqlfxml-producer.t
+++ b/t/17sqlfxml-producer.t
@@ -48,7 +48,7 @@ sub xml_equals
     my ($got, $expect, $msg) = (@_, "XML looks right");
     $got    =~ s/^ +//gm;
     $expect =~ s/^ +//gm;
-    eq_or_diff $got, $expect, $msg;
+    eq_or_diff $got, $expect, $msg, { context => 1 };
 }
 
 #