amend post.t to work with new body parsing rules
[catagits/Web-Simple.git] / t / post.t
index 8ca1321..1caa802 100644 (file)
--- a/t/post.t
+++ b/t/post.t
@@ -11,7 +11,7 @@ use Test::More (
   use Web::Simple 'PostTest';
   package PostTest;
   dispatch {
-    sub (%foo=&bar~) {
+    sub (%:foo=&:bar~) {
       $_[1]->{bar} ||= 'EMPTY';
       [ 200,
         [ "Content-type" => "text/plain" ],