projects
/
freeside.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
This commit was generated by cvs2svn to compensate for changes in r2523,
[freeside.git]
/
rt
/
webrt
/
Elements
/
SelectSortOrder
1
<SELECT NAME="<%$Name%>">
2
%foreach my $order (@orders) {
3
<OPTION VALUE="<%$order%>" <%$order eq $Default && 'SELECTED' %>>
4
<% shift @order_names %>
5
</OPTION>
6
% }
7
</SELECT>
8
9
<%INIT>
10
my @orders = qw (ASC DESC);
11
my @order_names = qw (Ascending Descending);
12
13
</%INIT>
14
15
<%ARGS>
16
$Name => 'SortOrder'
17
$Default => 'ASC'
18
</%ARGS>