1 %# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectResultsPerPage,v 1.1 2002-08-12 06:17:08 ivan Exp $
3 %# TODO: Better default handling
5 <SELECT NAME ="<%$Name%>">
6 % foreach my $value (@values) {
7 <OPTION VALUE="<%$value%>" <% $value == $Default && 'SELECTED' %>>
14 my @values = qw(0 10 25 50 100);
15 my @labels = qw(Unlimited 10 25 50 100);