changes after mst code review

[catagits/Web-Simple.git] / t / response-filter.t

diff --git a/t/response-filter.t b/t/response-filter.t
index c03ccd3..645e4e6 100644 (file)
--- a/t/response-filter.t
+++ b/t/response-filter.t
@@ -1,6 +1,4 @@
-use strict;
-use warnings FATAL => 'all';
-
+use strictures 1;
 use Test::More;  
 use Plack::Test;
 use HTTP::Request::Common qw(GET POST);
@@ -10,7 +8,7 @@ use HTTP::Request::Common qw(GET POST);
   use Web::Simple;
   sub dispatch_request {
     my $self = shift;
-      sub (.html) {
+    sub (.html) {
       response_filter {
         return [
           200,