r1829 - in packages/libspreadsheet-parseexcel-perl/trunk: ParseExcel debian

[Gunnar Wolf]

Author: gwolf
Date: 2006-01-02 17:29:15 +0000 (Mon, 02 Jan 2006)
New Revision: 1829

Modified:
   packages/libspreadsheet-parseexcel-perl/trunk/ParseExcel/Utility.pm
   packages/libspreadsheet-parseexcel-perl/trunk/debian/changelog
Log:
Fixes bug, allows files created by OpenOffice to be correctly parsed


Modified: packages/libspreadsheet-parseexcel-perl/trunk/ParseExcel/Utility.pm
===================================================================
--- packages/libspreadsheet-parseexcel-perl/trunk/ParseExcel/Utility.pm	2006-01-01 18:48:45 UTC (rev 1828)
+++ packages/libspreadsheet-parseexcel-perl/trunk/ParseExcel/Utility.pm	2006-01-02 17:29:15 UTC (rev 1829)
@@ -33,6 +33,12 @@
     my $sCond;
     my $sWkF ='';
     my $sRes='';
+
+    ### Debian-specific patch provided by Niko Tyni. Bug exists with ID 7206
+    ### in the CPAN request tracker.
+    # OpenOffice peculiarity?
+    $sFmt = '@' if ($sFmt eq "GENERAL");
+
 #1. Get Condition
     if($sFmt=~/^\[([<>=][^\]]+)\](.*)$/) {
         $sCond = $1;

Modified: packages/libspreadsheet-parseexcel-perl/trunk/debian/changelog
===================================================================
--- packages/libspreadsheet-parseexcel-perl/trunk/debian/changelog	2006-01-01 18:48:45 UTC (rev 1828)
+++ packages/libspreadsheet-parseexcel-perl/trunk/debian/changelog	2006-01-02 17:29:15 UTC (rev 1829)
@@ -1,3 +1,11 @@
+libspreadsheet-parseexcel-perl (0.2603-4) unstable; urgency=low
+
+  * No longer reports "GENERAL" instead of the actual value in files
+    created by OpenOffice - Thanks Niko Tyni for the patch! (Closes:
+    #298484)
+
+ -- Gunnar Wolf <gwolf at debian.org>  Mon,  2 Jan 2006 11:23:57 -0600
+
 libspreadsheet-parseexcel-perl (0.2603-3) unstable; urgency=low
 
   * Now allows for IO::File, IO::Handle, IO::Wrap objects to be passed