[freeside-commits] freeside/rt/html/Elements/CollectionAsTable ParseFormat, 1.1.1.2, 1.1.1.2.4.1

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/rt/html/Elements/CollectionAsTable
In directory wavetail.420.am:/tmp/cvs-serv10370/html/Elements/CollectionAsTable

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	ParseFormat 
Log Message:
merge in rt 3.4.6.  *gulp*!

Index: ParseFormat
===================================================================
RCS file: /home/cvs/cvsroot/freeside/rt/html/Elements/CollectionAsTable/ParseFormat,v
retrieving revision 1.1.1.2
retrieving revision 1.1.1.2.4.1
diff -u -d -r1.1.1.2 -r1.1.1.2.4.1
--- ParseFormat	15 Oct 2005 09:10:12 -0000	1.1.1.2
+++ ParseFormat	3 Mar 2008 23:07:38 -0000	1.1.1.2.4.1
@@ -48,7 +48,7 @@
 </%ARGS>
 
 <%init>
-use Regexp::Common;
+use Regexp::Common qw/delimited/;
 my @Columns;
 
 while ($Format =~ /($RE{delimited}{-delim=>qq{\'"}}|[{}\w.]+)/go) {
@@ -59,7 +59,9 @@
         substr($col,-1,1) = "";
     }
 
-    my $colref;
+    my $colref = {
+        title => '',
+    };
 
     if ( $col =~ s!/STYLE:([^/]+)!!io ) {
         $colref->{'style'} = $1;
@@ -88,7 +90,7 @@
         $colref->{'attribute'} = $col;
     }
     
-    if ( !$colref->{'title'} && grep { /^__(.*?)__$/io }
+    if ( !$colref->{'title'} && grep { /^__(.+?)__$/io }
         @{ $colref->{'output'} } )
     {   
         $colref->{'title'}     = $1;