%# There are no games on this system. % if (!@Depth) {
% } % foreach my $item (@$List) { <& index.html, Item => $item, Depth => [ @Depth, ($item == $List->[-1] ) ], Seen => $Seen &> % } % if (!@Depth) {
% foreach my $last (@Depth) { % } <% $item->DisplayName %>
Description) ? 'disabled' : '' %> type="button" value="<&|/l&>Edit Subgroups" style="float: right; margin-top: 2px" onclick="<& /Edit/Elements/NewWindow, "/Edit/Groups/MemberGroups/Add.html?Group=" . $Item->Id, 600, 365 &>"> % } <%INIT> return if $Seen->{$Item}++; my $Members = $Item->MembersObj || $RT::Nothing; $Members->LimitToGroups; my $List = $Members->ItemsArrayRef || []; @$List = ( map { $_->[0] } sort { $a->[1] cmp $b->[1] } map { [ $_ => (int($_->Description) ? 1 : 0) . $_->Name ] } grep { $_->Name } map { $_->MemberObj->Object } @$List ); <%ARGS> $Item => undef $Seen => {} @Depth => ()