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=baeb1083c59716c197d191a156bade826372942f;hp=f2336915f6d244b1fc279279554590ba6d6f3629;hb=6a226ee3384511ecfe42baf99ed67f9b90469b70;hpb=501605db974f1e0ee05bc34fe1060c765001bb77

diff --git a/t/middleware-stash.t b/t/middleware-stash.t
index f233691..baeb108 100644
--- a/t/middleware-stash.t
+++ b/t/middleware-stash.t
@@ -14,11 +14,7 @@ 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';
+    is_deeply [sort {$a cmp $b} keys(%{$c->stash})], ['inner','outer'], 'both keys in stash';
   }
 
   package MyAppChild;
@@ -38,7 +34,7 @@ use strict;
     $c->stash->{outer} = "outer";
     $c->res->from_psgi_response( MyAppChild->to_app->($c->req->env) );
 
-    is_deeply [keys($c->stash)], ['outer'], 'only one key in stash';
+    is_deeply [keys(%{$c->stash})], ['outer'], 'only one key in stash';
   }
 
   package MyAppParent;