rt/t/web/psgi-wrap.t

   1 use strict;
   2 use warnings;
   3
   4 use RT::Test
   5     tests   => undef,
   6     plugins => [qw(RT::Extension::PSGIWrap)];
   7
   8 my ($base, $m) = RT::Test->started_ok;
   9 $m->login;
  10 ok(my $res = $m->get("/"));
  11 is($res->code, 200, 'Successful request to /');
  12 ok($res->header('X-RT-PSGIWrap'), 'X-RT-PSGIWrap header set from the plugin');
  13
  14 undef $m;
  15 done_testing();