version 1.12, 2007/04/11 19:52:44
|
version 1.13, 2007/04/11 21:37:24
|
Line 357 while (<STDIN>) {
|
Line 357 while (<STDIN>) {
|
$address=~s/\/+/\//g; |
$address=~s/\/+/\//g; |
if ($address=~/^\/(status|adm\/|res\/adm\/)/) { |
if ($address=~/^\/(status|adm\/|res\/adm\/)/) { |
$fail = 0; |
$fail = 0; |
} elsif ($address =~ /^\/res\/([^\/]+)\/\1\-domainconfig\/(logo|domlogo|img)\/[^\/]+$/) { |
} elsif (&Apache::lonnet::is_domainimage($address)) { |
if (&Apache::lonnet::domain($1) ne '') { |
$fail = 0; |
$fail = 0; |
|
} |
|
} |
} |
|
|
# |
# |
# because existing restriction matrix would not do precedence across rules |
# because existing restriction matrix would not do precedence across rules |
# |
# |