Line # Revision Author
1 3 ahitrov@rambler.ru <!-- ��������� ����� -->
2
3 <fieldset>
4 <legend>�������� ���</legend>
5
6 % if ($removed) {
7 <script>alert('��� ������!');</script>
8 % }
9
10 <div align="center">
11 <input type="submit" onClick="javascript: location.search='cache=remove'" class="input_btn" style="width:60%; height:30px;" name="cache" value="�������� ���">
12 </div>
13
14 </fieldset>
15
16 <%args>
17
18 $cache => undef
19
20 </%args>
21 <%init>
22
23 my $removed;
24 if ($cache eq 'remove') {
25 # ���� ����������� API ��� �������� ����� ����, ���� ������ ��� �������� namespace
26 # ������� ���������� ������� ������... :)
27
28 my $backend = $m->cache->{_Backend};
29 my @namespaces = $backend->get_namespaces();
30 foreach (@namespaces) {
31 $backend->delete_namespace($_);
32 }
33 $removed = 1;
34 }
35
36 </%init>