%# $Header: /raid/cvsroot/rt/webrt/Search/Attic/Listing.html,v 1.1.2.28 2000/08/04 19:41:10 jesse Exp $ %# Copyright 1996-2000 Jesse Vincent <& /Elements/Header, Title => "Ticket Listing / Queue View" &> %#<& QueueInterpretRestrictionCookies &> %#<& QueueHeader format="$format" &> %foreach (@{Config(\%ARGS, 'QueueListingCols')}) { %} <%PERL> my $cnt=0; while (my $Ticket = $session{'tickets'}->Next) { my $bgcolor; $cnt++; if (($cnt % 2) == 1) { $bgcolor = "#cccccc"; } else { $bgcolor = "#ffffff"; } %# The ticket view is controlled by config.pm, WebOptions %foreach (@{Config(\%ARGS, 'QueueListingCols')}) { %} %}
<% $_->{Header} %>
<& TicketCell , Ticket=>$Ticket, Column=>$_ &>
%#<& QueueFooter format="$format" &>
<& PickRestriction &> <%INIT> require RT::Interface::Web; &ProcessSearchQuery(ARGS=>\%ARGS); #$foo =$session{'tickets'}->Restrictions;