X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Fmiddleware-stash.t;h=f2336915f6d244b1fc279279554590ba6d6f3629;hp=e35e9ef902aec616985615bfcb4a233cd5adf28b;hb=501605db974f1e0ee05bc34fe1060c765001bb77;hpb=bd4b086b23987a3f29bfc16d1a64b03c45a02884 diff --git a/t/middleware-stash.t b/t/middleware-stash.t index e35e9ef..f233691 100644 --- a/t/middleware-stash.t +++ b/t/middleware-stash.t @@ -14,6 +14,10 @@ use strict; $c->stash->{inner} = "inner"; $c->res->body( "inner: ${\$c->stash->{inner}}, outer: ${\$c->stash->{outer}}"); + use Devel::Dwarn; + my $stash = $c->stash; + Dwarn $stash; + is_deeply [sort {$a cmp $b} keys($c->stash)], ['inner','outer'], 'both keys in stash'; }