Changed to use new "SqlfXML" producer.

[dbsrgits/SQL-Translator.git] / t / 05bgep-re.t

diff --git a/t/05bgep-re.t b/t/05bgep-re.t
index 75e9516..00292b9 100644 (file)
--- a/t/05bgep-re.t
+++ b/t/05bgep-re.t
@@ -15,9 +15,11 @@ my $test_data = (-d "t")
     ? catfile($Bin, @data)
     : catfile($Bin, "t", @data);
 
-my $tr = SQL::Translator->new(parser => "MySQL",
-                              producer => "XML",
-                              filename => $test_data);
+my $tr       =  SQL::Translator->new(
+    parser   => 'MySQL',
+    producer => 'SqlfXML',
+    filename => $test_data
+);
 my $data = $tr->translate;
 
 ok($data, "MySQL->XML");