t/13no_include_path.t

   1 #!perl
   2
   3 use strict;
   4 use warnings;
   5
   6 use FindBin;
   7 use lib "$FindBin::Bin/lib";
   8
   9 use Test::More tests => 4;
  10 use Catalyst::Test 'TestApp';
  11
  12 # test passthrough to root
  13 ok( my $res = request('http://localhost/images/bad.gif'), 'request ok' );
  14 is( $res->content_type, 'image/gif', 'root path ok' );
  15
  16 is( scalar @{ TestApp->config->{'Plugin::Static::Simple'}->{include_path} }, 1, 'One include path used');
  17 is( TestApp->config->{'Plugin::Static::Simple'}->{include_path}->[0], TestApp->config->{root}, "It's the root path" );