Changeset 30023

Timestamp:

02/14/09 00:47:26 (4 years ago)

Author:

yappo

Message:

this commit is dont work

Files:

• lang/perl/HTTP-Engine-Middleware/trunk/t/200_middlewares/static.t (modified) (2 diffs)

lang/perl/HTTP-Engine-Middleware/trunk/t/200_middlewares/static.t

@@ -10 +10 @@
 plan skip_all => "MooseX::Types::Path::Class is not installed" unless eval "use MooseX::Types::Path::Class;1;";
 
-plan tests => 8 * blocks;
+plan tests => 12 * blocks;
 
 use HTTP::Engine;
@@ -57 +57 @@
 
     run_tests($block, $mw2);
+
+    my @config2 = (
+        'HTTP::Engine::Middleware::Static' => {
+            regexp  => qr{^(/css/.+|/robots\.txt)$},
+            docroot => Path::Class::Dir->new('t', 'htdocs')->stringify,
+        },
+    );
+
+    my $mw3 = HTTP::Engine::Middleware->new;
+    ok $mw3->install(@config2), 'firast instance';
+
+    run_tests($block, $mw3);
 };