| |
1 |
1 |
ad_page_contract { |
| |
2 |
2 |
Cache Viewer |
| |
3 |
3 |
} { |
| |
4 |
4 |
{cache:optional,notnull 0} |
| |
5 |
|
{item:token,optional,notnull 0} |
| |
|
5 |
{item:safetclchars,optional,notnull 0} |
| |
6 |
6 |
{flush:boolean,optional,notnull 0} |
| |
7 |
7 |
{filter ""} |
| |
8 |
8 |
{flushall:boolean,optional,notnull 0} |
| |
9 |
9 |
{flushallcaches:optional,boolean,notnull 0} |
| |
10 |
10 |
} -properties { |
| |
11 |
11 |
title:onevalue |
| |
12 |
12 |
context:onevalue |
| |
13 |
13 |
} |
| |
14 |
14 |
|
| |
15 |
15 |
set admin_p [acs_user::site_wide_admin_p] |
| |
16 |
16 |
if {!$admin_p} { |
| |
17 |
17 |
ad_return_warning "Insufficient Permissions" \ |
| |
18 |
18 |
"Only side wide admins are allowed to view this page!" |
| |
19 |
19 |
ad_script_abort |
| |
20 |
20 |
} |
| |
21 |
21 |
|
| |
22 |
22 |
# Expires: now |
| |
23 |
23 |
ns_set update [ns_conn outputheaders] "Expires" "now" |
| |
24 |
24 |
|
| |
25 |
25 |
if { $flushallcaches } { |