blob: cb542d1585a08a584a970d21ba1d8c44a14b10d7 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
use strict;
use warnings FATAL => 'all';
use Apache::Test;
use Apache::TestRequest;
use Apache::TestUtil qw/t_start_error_log_watch t_finish_error_log_watch/;
plan tests => 8, need_min_apache_version('2.3.6');
my $base = "/apache/loglevel";
t_start_error_log_watch();
my @error_expected =qw{
core_info
info
crit/core_info
info/core_crit/info
};
my @error_not_expected =qw{
core_crit
crit
info/core_crit
crit/core_info/crit
};
my $dir;
foreach $dir (@error_expected) {
GET "$base/$dir/not_found_error_expected";
}
foreach $dir (@error_not_expected) {
GET "$base/$dir/not_found_error_NOT_expected";
}
my @loglines = t_finish_error_log_watch();
my $log = join("\n", @loglines);
foreach $dir (@error_expected) {
ok($log =~ m{does not exist.*?$base/$dir/not_found_error_expected});
}
foreach $dir (@error_not_expected) {
ok($log !~ m{does not exist.*?$base/$dir/not_found_error_NOT_expected});
}
|
