[Rt-commit] [svn] r1290 - rt/branches/3.2-RELEASE/html/Search

[huberth at pallas.eruditorum.org]

Author: huberth
Date: Wed Jul 28 14:39:36 2004
New Revision: 1290

Modified:
   rt/branches/3.2-RELEASE/html/Search/Results.tsv
Log:
RT-Ticket: 5899
RT-Status: resolved

 * html/Search/Results.tsv now works with custom fields that have line breaks
   within them.



Modified: rt/branches/3.2-RELEASE/html/Search/Results.tsv
==============================================================================
--- rt/branches/3.2-RELEASE/html/Search/Results.tsv	(original)
+++ rt/branches/3.2-RELEASE/html/Search/Results.tsv	Wed Jul 28 14:39:36 2004
@@ -85,7 +85,7 @@
 my @header;
     foreach my $attr (@attrs) {
         my $label = $attr;
-        $label =~ s'Obj-.(AsString|Name)''g;
+        $label =~ s'Obj-.(AsString|Name|ISO)''g;
 	push @header, $label;
     }
     foreach my $id (sort keys %known_cfs) {
@@ -100,8 +100,10 @@
         foreach my $attr(@attrs) {
                 push @row, $row->{"$attr"};
         }
-    foreach my $id (sort keys %known_cfs) {
-                push @row, $row->{'CustomField-'.$id};
+        foreach my $id (sort keys %known_cfs) {
+	        my $val = $row->{'CustomField-'.$id};
+                $val =~ s/(\n|\r)//g;
+                push @row, $val;
         }
         
         $m->out(join("\t", at row));