[Bps-public-commit] r20135 - RT-BugTracker/html/Dist/Elements

[ruz at bestpractical.com]

Author: ruz
Date: Mon Nov 23 19:26:20 2009
New Revision: 20135

Modified:
   RT-BugTracker/html/Dist/Elements/ShowMaintainers

Log:
* ShowMaintainers links to show Dists by maintainer

Modified: RT-BugTracker/html/Dist/Elements/ShowMaintainers
==============================================================================
--- RT-BugTracker/html/Dist/Elements/ShowMaintainers	(original)
+++ RT-BugTracker/html/Dist/Elements/ShowMaintainers	Mon Nov 23 19:26:20 2009
@@ -1,13 +1,26 @@
 <h3><% loc('Maintainer(s)') %></h3>
 
-<p><% $maint %></p>
+<p>
+% while ( my $maint = shift @maints ) {
+% if ( $URL ) {
+<a href="<% $RT::WebPath %>/<% $URL %><% $maint |u %>"><% $maint %></a>\
+% } else {
+<% $maint %>\
+% }
+% if ( @maints ) { $m->out(', ') }
+% }
+</p>
 
 <%ARGS>
 $Queue
+$URL => 'Dist/ByMaintainer.html?Name='
 </%ARGS>
 <%INIT>
 
+# XXX: implement this as list with CSS
+
 my $admincc = $Queue->AdminCc->UserMembersObj;
-my $maint = join ", ", map $_->Name, @{$admincc->ItemsArrayRef};
+my @maints = map $_->Name, @{$admincc->ItemsArrayRef};
+return unless @maints;
 
 </%INIT>