version 1.168, 2017/12/21 22:06:44
|
version 1.169, 2018/01/12 13:33:46
|
Line 584 sub handler {
|
Line 584 sub handler {
|
$env{'form.origurl'} = $r->uri; |
$env{'form.origurl'} = $r->uri; |
} |
} |
} |
} |
|
if ($requrl=~m{^/+tiny/+$match_domain/+\w+$}) { |
|
return OK; |
|
} |
# ---------------------------------------------------------------- Check access |
# ---------------------------------------------------------------- Check access |
my $now = time; |
my $now = time; |
if ($requrl !~ m{^/(?:adm|public|prtspool)/} |
if ($requrl !~ m{^/(?:adm|public|prtspool)/} |