X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestApp%2FView%2FDump%2FEnv.pm;h=d713b0e290be2b1b476eb87e964b119916fcc982;hp=a869be3c10a70f0c032e135aa1e528a82a26a22f;hb=df1fa879e566937a591446d454bb8d3a17a70a2c;hpb=532f0516947cf047368e91150ca2ab1cfd4c1e64 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;