[Rt-commit] r8142 - rt/branches/3.7-EXPERIMENTAL-TUNIS/html/Search/Elements

[ruz at bestpractical.com]

Author: ruz
Date: Thu Jul 12 17:18:47 2007
New Revision: 8142

Modified:
   rt/branches/3.7-EXPERIMENTAL-TUNIS/html/Search/Elements/NewListActions

Log:
* make NewListActions comp compatible with old one
* refactor it a little

Modified: rt/branches/3.7-EXPERIMENTAL-TUNIS/html/Search/Elements/NewListActions
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL-TUNIS/html/Search/Elements/NewListActions	(original)
+++ rt/branches/3.7-EXPERIMENTAL-TUNIS/html/Search/Elements/NewListActions	Thu Jul 12 17:18:47 2007
@@ -45,10 +45,8 @@
 %# those contributions and any derivatives thereof.
 %# 
 %# END BPS TAGGED BLOCK }}}
-% if ($actions[0] ) {
 <b><%loc('Results')%></b><br />
 % foreach my $action (@actions) {
-% next unless ($action);
 % my @item = @$action;
 % if ($item[1] < 0) {
 <font color="red"> 
@@ -59,9 +57,9 @@
 % }
 % }
 <br />
-% }
 <%init>
- at actions = grep (/./, at actions);
+ at actions = map ref $_? $_: [$_, 0], grep defined && length, @actions;
+return unless @actions;
 </%init>
 <%ARGS>
 @actions => undef