From: Marcus Ramberg <marcus@nordaaker.com>
Date: Wed, 30 Mar 2005 09:42:26 +0000 (+0000)
Subject: 15/16 OK
X-Git-Tag: 5.7099_04~1650
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9113e2701050e4a0ba3011916043edd24881651e;p=catagits%2FCatalyst-Runtime.git

15/16 OK
---

diff --git a/t/15connection.t b/t/15connection.t
index c9a9ac9..a5117fd 100644
--- a/t/15connection.t
+++ b/t/15connection.t
@@ -11,6 +11,8 @@ sub address : Global {
     $c->res->output( $c->req->address );
 }
 
+__PACKAGE__->setup;
+
 package main;
 
 use Test::More tests => 2;
diff --git a/t/16post.t b/t/16post.t
index 45abbd3..5ff4fa9 100644
--- a/t/16post.t
+++ b/t/16post.t
@@ -2,20 +2,20 @@ package TestApp;
 
 use Catalyst qw[-Engine=Test];
 
-__PACKAGE__->action(
-    echo => sub {
-        my ( $self, $c ) = @_;
-
-        for my $field ( $c->req->headers->header_field_names ) {
-            my $header = ( $field =~ /^X-/ ) ? $field : "X-$field";
-            $c->res->headers->header(
-                $header => $c->req->headers->header($field) );
-        }
-
-        $c->res->headers->content_type('text/plain');
-        $c->res->output('ok');
+sub echo : Global {
+    my ( $self, $c ) = @_;
+
+    for my $field ( $c->req->headers->header_field_names ) {
+        my $header = ( $field =~ /^X-/ ) ? $field : "X-$field";
+        $c->res->headers->header(
+            $header => $c->req->headers->header($field) );
     }
-);
+
+    $c->res->headers->content_type('text/plain');
+    $c->res->output('ok');
+}
+
+__PACKAGE__->setup;
 
 package main;