[Rt-commit] r7009 - rt/branches/3.6-RELEASE/html/Elements/RT__Ticket

ruz at bestpractical.com ruz at bestpractical.com
Wed Feb 14 16:03:14 EST 2007


Author: ruz
Date: Wed Feb 14 16:03:14 2007
New Revision: 7009

Modified:
   rt/branches/3.6-RELEASE/html/Elements/RT__Ticket/ColumnMap

Log:
* get rid of the latest named functions in our comps

Modified: rt/branches/3.6-RELEASE/html/Elements/RT__Ticket/ColumnMap
==============================================================================
--- rt/branches/3.6-RELEASE/html/Elements/RT__Ticket/ColumnMap	(original)
+++ rt/branches/3.6-RELEASE/html/Elements/RT__Ticket/ColumnMap	Wed Feb 14 16:03:14 2007
@@ -52,7 +52,7 @@
 <%ONCE>
 our ( $COLUMN_MAP );
 
-sub ColumnMap {
+my $ColumnMap = sub {
     my $name = shift;
     my $attr = shift;
 
@@ -92,7 +92,7 @@
     }
 }
 
-sub LinkCallback {
+my $LinkCallback = sub {
     my $method = shift;
 
     my $mode            = $RT::Ticket::LINKTYPEMAP{$method}{Mode};
@@ -291,7 +291,7 @@
 
     # Everything from LINKTYPEMAP
     (map {
-        $_ => { value => LinkCallback( $_ ) }
+        $_ => { value => $LinkCallback->( $_ ) }
     } keys %RT::Ticket::LINKTYPEMAP),
 
     '_CLASS' => {
@@ -308,5 +308,5 @@
 </%ONCE>
 <%init>
 $m->comp( '/Elements/Callback', COLUMN_MAP    => $COLUMN_MAP, _CallbackName => 'ColumnMap');
-return ColumnMap($Name, $Attr);
+return $ColumnMap->( $Name, $Attr );
 </%init>


More information about the Rt-commit mailing list