diff options
author | franck cuny <franck@lumberjaph.net> | 2010-06-20 21:25:43 +0200 |
---|---|---|
committer | franck cuny <franck@lumberjaph.net> | 2010-06-20 21:25:43 +0200 |
commit | 2a4263b9eda053d3a4d6d2f1248514e4df5d42b2 (patch) | |
tree | 68096a9133af75441fa546d3e68f9cd194401680 /t/less.t | |
download | plack-middleware-file-less-master.tar.gz |
import: mostly stolen from P::M::F::Sass master
Diffstat (limited to 't/less.t')
-rw-r--r-- | t/less.t | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/t/less.t b/t/less.t new file mode 100644 index 0000000..9be599f --- /dev/null +++ b/t/less.t @@ -0,0 +1,28 @@ +use strict; +use Plack::App::File; +use Plack::Middleware::File::Less; +use Test::More; +use Plack::Test; +use HTTP::Request::Common; + +my $app = Plack::App::File->new(root => "t"); +$app = Plack::Middleware::File::Less->wrap($app); + +test_psgi $app, sub { + my $cb = shift; + + my $res = $cb->(GET "/"); + is $res->code, 404; + + $res = $cb->(GET "/foo.css"); + is $res->code, 200; + is $res->content_type, 'text/css'; + like $res->content, qr/color: #4D926F;/; + + $res = $cb->(GET "/bar.css"); + is $res->code, 200; + is $res->content_type, 'text/css'; + like $res->content, qr/float: left/; +}; + +done_testing; |