event refactor, landing on HEAD!

[freeside.git] / httemplate / elements / select-cust_pkg-status.html

diff --git a/httemplate/elements/select-cust_pkg-status.html b/httemplate/elements/select-cust_pkg-status.html
index 5da93fe..2d545c0 100644 (file)
--- a/httemplate/elements/select-cust_pkg-status.html
+++ b/httemplate/elements/select-cust_pkg-status.html
@@ -1,19 +1,30 @@
-<%
-  my( $status, %opt ) = @_;
+<SELECT NAME="<% $opt{'field'} || 'status' %>"
+        <% $opt{'multiple'} ? 'MULTIPLE' : '' %>
+        <% $onchange %>
+>
 
-  $opt{'statuses'} ||= [ FS::cust_pkg->statuses() ]; # { disabled=>'' } )
+  <OPTION VALUE="">all
 
-%>
+% foreach my $option ( @{ $opt{'statuses'} } ) { 
 
-<SELECT NAME="status">
+    <OPTION VALUE="<% $option %>"
+            <% $option eq $curr_value ? 'SELECTED' : '' %>
+    ><% $option %>
 
-  <OPTION VALUE="">all
+% } 
+
+</SELECT>
 
-  <% foreach my $status ( @{ $opt{'statuses'} } ) { %>
+<%init>
 
-       <OPTION VALUE="<%= $status %>"><%= $status %>
+my %opt = @_;
 
-  <% } %>
+$opt{'statuses'} ||= [ FS::cust_pkg->statuses() ]; # { disabled=>'' } )
 
-</SELECT>
+my $onchange = $opt{'onchange'}
+                 ? 'onChange="'. $opt{'onchange'}. '(this)"'
+                 : '';
+
+my $curr_value = $opt{'curr_value'} || $opt{'value'};
 
+</%init>