t/10-live_auto.t

   1 use strict;
   2 use warnings;
   3
   4 use FindBin;
   5 use lib "$FindBin::Bin/lib";
   6
   7 use Test::More tests => 4;
   8
   9 use Catalyst::Test 'TestApp';
  10
  11 {
  12     my $response;
  13     ok( $response = request('http://localhost/config/'), 'request ok' );
  14     is( $response->content, 'foo', 'config ok' );
  15
  16     $response = request('http://localhost/appconfig/cache');
  17     ok( $response->content !~ /^__HOME__/, 'home dir substituted in config var' );
  18
  19     $response = request('http://localhost/appconfig/foo');
  20     is( $response->content, 'bar', 'app finalize_config works' );
  21 }