From: Emmanuel Lacour <elacour@home-dn.net>
Date: Tue, 16 Sep 2008 14:07:56 +0000 (+0000)
Subject: Update to 3.8.1 tsv file
X-Git-Tag: 0.03~1
X-Git-Url: http://git.home-dn.net/?p=manu%2FRT-Extension-SearchResults-XLS.git;a=commitdiff_plain;h=749fc84520d6997eb81b43a38448e2ce89bee258;hp=60e42df24ab4e89134835f539359b12ad529e6c5

Update to 3.8.1 tsv file
---

diff --git a/html/Search/Results.xls b/html/Search/Results.xls
index 533de19..0627c97 100644
--- a/html/Search/Results.xls
+++ b/html/Search/Results.xls
@@ -1,8 +1,8 @@
 %# BEGIN BPS TAGGED BLOCK {{{
 %# 
 %# COPYRIGHT:
-%#  
-%# This software is Copyright (c) 1996-2007 Best Practical Solutions, LLC 
+%# 
+%# This software is Copyright (c) 1996-2008 Best Practical Solutions, LLC
 %#                                          <jesse@bestpractical.com>
 %# 
 %# (Except where explicitly superseded by other copyright notices)
@@ -24,7 +24,7 @@
 %# along with this program; if not, write to the Free Software
 %# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
 %# 02110-1301 or visit their web page on the internet at
-%# http://www.gnu.org/copyleft/gpl.html.
+%# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html.
 %# 
 %# 
 %# CONTRIBUTION SUBMISSION POLICY:
@@ -88,6 +88,7 @@ while ( my $Ticket = $Tickets->Next()) {
             $row->{$attr} = "";
         } else {
             my $method = '$Ticket->'.$attr.'()';
+            $method =~ s/->ISO\(\)$/->ISO( Timezone => 'user' )/;
             $row->{$attr} = eval $method;
             if ($@) {die "Failed to find $attr - ". $@}; 
         }
@@ -95,15 +96,13 @@ while ( my $Ticket = $Tickets->Next()) {
 
     my $cfs = $Ticket->QueueObj->TicketCustomFields();
     while (my $cf = $cfs->Next) {
+        $known_cfs{$cf->Id} = $cf->Name;
         my @content;
         my $values = $Ticket->CustomFieldValues($cf->Id);
         while (my $value = $values->Next) {
             push @content, $value->Content;
         }
         $row->{'CustomField-'.$cf->Id} = join(', ',@content);
-        if ($row->{'CustomField-'.$cf->Id}) {
-            $known_cfs{$cf->Id} = $cf->Name;
-        }
     }
     push @rows, $row;
 }