t/14deprecated.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 => 5;
  10 use Catalyst::Test 'IncTestApp';
  11
  12 is( $TestLog::logged, "Deprecated 'static' config key used, please use the key 'Plugin::Static::Simple' instead",
  13     "Got warning" );
  14
  15 # test overlay dir
  16 ok( my $res = request('http://localhost/overlay.jpg'), 'request ok' );
  17 is( $res->content_type, 'image/jpeg', 'overlay path ok' );
  18
  19 # test passthrough to root
  20 ok( $res = request('http://localhost/images/bad.gif'), 'request ok' );
  21 is( $res->content_type, 'image/gif', 'root path ok' );
  22