[Rt-commit] r2745 - in rt/branches/3.4-RELEASE: . html/Elements/CollectionAsTable

jesse at bestpractical.com jesse at bestpractical.com
Sun Apr 17 21:45:01 EDT 2005


Author: jesse
Date: Sun Apr 17 21:45:00 2005
New Revision: 2745

Modified:
   rt/branches/3.4-RELEASE/   (props changed)
   rt/branches/3.4-RELEASE/html/Elements/CollectionAsTable/Row
Log:
 r13194 at hualien:  jesse | 2005-04-17 21:31:40 -0400
 RT-Ticket: 6522
 RT-Status: resolved
 RT-Update: correspond
 
 * Newlines in CustomFields are now displayed in TicketList results
 
 


Modified: rt/branches/3.4-RELEASE/html/Elements/CollectionAsTable/Row
==============================================================================
--- rt/branches/3.4-RELEASE/html/Elements/CollectionAsTable/Row	(original)
+++ rt/branches/3.4-RELEASE/html/Elements/CollectionAsTable/Row	Sun Apr 17 21:45:00 2005
@@ -80,23 +80,26 @@
                 Name => $col,
                 Attr => 'value'
             );
+            my @out;
 
             if ( $value && ref($value) ) {
 
                 # All HTML snippets are returned by the callback function
                 # as scalar references.  Data fetched from the objects are
                 # plain scalars, and needs to be escaped properly.
-                $m->out(
+                @out =
                     map {
                         ref($_) ? $$_ : $m->interp->apply_escapes( $_ => 'h' )
                       } &{$value}( $record, $i )
-                );
+                ;
             }
             else {
 
                 # Simple value; just escape it.
-                $m->out( $m->interp->apply_escapes( $value => 'h' ) );
+                @out = $m->interp->apply_escapes( $value => 'h' );
             }
+            s/\n/<br>/gs for @out;
+            $m->out( @out );
         }
         else {
             $m->out($subcol);


More information about the Rt-commit mailing list