X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Ffixtures.pl;h=fbb6755c99bc338f46762c3ed89a237fe1ce90f4;hb=c77361b0997c806cfe75c9cb0ebee0ff61376706;hp=3884f4d5e6c2188f2cc6c09430f8441b37a5f6d9;hpb=a231da50692cfbaa840edb5c85ea037212997b46;p=p5sagit%2FData-Dumper-ToXS.git

diff --git a/t/fixtures.pl b/t/fixtures.pl
index 3884f4d..fbb6755 100644
--- a/t/fixtures.pl
+++ b/t/fixtures.pl
@@ -1,3 +1,7 @@
+use strictures 1;
+# disable the "Useless use of anonymous list ([]) in void context"
+# warning so we can perl -c this file during development
+no warnings 'void';
 [
   data_structure =>
   {
@@ -25,4 +29,8 @@
         ]
       };
     }
-]
+],
+do { sub DDXSTest::foo { 'DDXSTest::foo' } () },
+[
+  global_sub => { foo => \&DDXSTest::foo }
+];