X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp%2FView%2FDump%2FEnv.pm;h=d713b0e290be2b1b476eb87e964b119916fcc982;hb=416771b3f7be55e0d19548350d6c8b9f4b5d950a;hp=a869be3c10a70f0c032e135aa1e528a82a26a22f;hpb=7b73c8765925a05953204dbddea9ad601558f1ce;p=catagits%2FCatalyst-Runtime.git diff --git a/t/lib/TestApp/View/Dump/Env.pm b/t/lib/TestApp/View/Dump/Env.pm index a869be3..d713b0e 100644 --- a/t/lib/TestApp/View/Dump/Env.pm +++ b/t/lib/TestApp/View/Dump/Env.pm @@ -13,5 +13,14 @@ sub process { }); } +## We override Data::Dumper here since its not reliably outputting +## something that is roundtrip-able. + +sub dump { + my ( $self, $reference ) = @_; + use Data::Dump (); + return Data::Dump::dump($reference); +} + 1;