r1035 - packages/libspreadsheet-parseexcel-perl/trunk
Gunnar Wolf
gwolf@costa.debian.org
Tue, 24 May 2005 19:30:24 +0000
Author: gwolf
Date: 2005-05-24 19:30:23 +0000 (Tue, 24 May 2005)
New Revision: 1035
Modified:
packages/libspreadsheet-parseexcel-perl/trunk/ParseExcel.pm
Log:
Grrrrrrrr... Left a debugging warning in :(
Modified: packages/libspreadsheet-parseexcel-perl/trunk/ParseExcel.pm
===================================================================
--- packages/libspreadsheet-parseexcel-perl/trunk/ParseExcel.pm 2005-05-24 19:27:01 UTC (rev 1034)
+++ packages/libspreadsheet-parseexcel-perl/trunk/ParseExcel.pm 2005-05-24 19:30:23 UTC (rev 1035)
@@ -376,7 +376,6 @@
#1.4 Specified by IO::File/Handle/Wrap object
$oBook->{File} = undef;
my $sBuff = join('',$sFile->getlines);
- warn "Acá estoy - sBuff mide ",length($sBuff);
($sBIFF, $iLen) = $oThis->{GetContent}->(\$sBuff);
return undef unless($sBIFF);
}