Use ->write_string instead of ->write to make sure text starting with "=" are not...
authorEmmanuel Lacour <elacour@easter-eggs.com>
Wed, 11 May 2011 15:06:54 +0000 (17:06 +0200)
committerEmmanuel Lacour <elacour@easter-eggs.com>
Wed, 11 May 2011 15:06:54 +0000 (17:06 +0200)
html/Search/Results.xls

index c4600c6..fb081f0 100644 (file)
@@ -119,7 +119,7 @@ $r->content_type('application/vnd.ms-excel');
     }
     my $ws_col = 0;
     foreach my $ws_val ( @header ) {
     }
     my $ws_col = 0;
     foreach my $ws_val ( @header ) {
-        $worksheet->write(0, $ws_col, $ws_val);
+        $worksheet->write_string(0, $ws_col, $ws_val);
         $ws_col++;
     }
 }
         $ws_col++;
     }
 }
@@ -154,7 +154,7 @@ while ( my $Ticket = $Tickets->Next()) {
 
     my $ws_col = 0;
     foreach my $ws_val ( @row ) {
 
     my $ws_col = 0;
     foreach my $ws_val ( @row ) {
-        $worksheet->write($ws_row, $ws_col, $ws_val);
+        $worksheet->write_string($ws_row, $ws_col, $ws_val);
         $ws_col++;
     }
     $ws_row++;
         $ws_col++;
     }
     $ws_row++;