summaryrefslogtreecommitdiffstats
path: root/debian/perl-framework/t/apache/iffile.t
blob: fab15a165ceeaf0bc44a35c4508760cfa96e9fc8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
use strict;
use warnings FATAL => 'all';

use Apache::Test;
use Apache::TestRequest;
use Apache::TestUtil;

# Available since 2.4.34, but quoted paths in <IfFile> fixed in 2.4.35
plan tests => 2,
     need(
         need_module('mod_headers'),
         need_min_apache_version('2.4.35')
     );

my $resp = GET('/apache/iffile/document');
ok t_cmp($resp->code, 200);
ok t_cmp($resp->header('X-Out'), "success1, success2, success3, success4, success5");