RT 4.2.11, ticket#13852

[freeside.git] / rt / t / web / psgi-wrap.t

diff --git a/rt/t/web/psgi-wrap.t b/rt/t/web/psgi-wrap.t
new file mode 100644 (file)
index 0000000..0e4b053
--- /dev/null
+++ b/rt/t/web/psgi-wrap.t
@@ -0,0 +1,15 @@
+use strict;
+use warnings;
+
+use RT::Test
+    tests   => undef,
+    plugins => [qw(RT::Extension::PSGIWrap)];
+
+my ($base, $m) = RT::Test->started_ok;
+$m->login;
+ok(my $res = $m->get("/"));
+is($res->code, 200, 'Successful request to /');
+ok($res->header('X-RT-PSGIWrap'), 'X-RT-PSGIWrap header set from the plugin');
+
+undef $m;
+done_testing();