Line # Revision Author
1 8 ahitrov@rambler.ru <fieldset>
2 <legend>Пользователи редакторского интерфейса</legend>
3 <style>
4 ul.listtypes {margin:0 0 0 20px; padding:0 0 0 1.5em;}
5 ul.listtypes li {list-style-image:url(/contenido/i/nav-2-a.gif)}
6 ul.listtypes li.active, ul.listtypes li.unactive {list-style-image:url(/contenido/i/nav-2.gif)}
7 ul.listtypes li.unactive a {color:gray}
8 </style>
9
10 117 ahitrov <ul class="listtypes" style="font-size:11px;font-family:Tahoma;text-align:left;">
11 8 ahitrov@rambler.ru % for my $u (sort { $a->name cmp $b->name } @users) {
12 <li class="<% $u->status == 0 ? 'un' : '' %>active"><a href="users.html?login=<% $u->login() %>&class=<% $u->class() %>"><% $u->name() %> (<% $u->login() %>)</a>
13 % }
14 </ul>
15
16 <table cellspacing="2" cellpadding="0" border="0" class="tform">
17 <tr><td height="5"></td></tr>
18 <tr><td colspan="2"><b><a href="users.html?class=">Новый пользователь &raquo;</a></b></td></tr>
19 <tr><td height="5"></td></tr>
20 </table>
21 </fieldset>
22
23 <%once>
24 use locale;
25 </%once>
26
27 <%init>
28 return unless ref $user;
29 return unless $user->check_group(1);
30
31 my @users = $keeper->_get_users();
32 </%init>