Changeset 75
- Timestamp:
- 04/27/08 22:17:44 (4 months ago)
- Files:
-
- trunk/apps/pdfdiff/Perl/lib/PDF/Extract/Text.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/apps/pdfdiff/Perl/lib/PDF/Extract/Text.pm
r74 r75 151 151 if ($lines->[$ii] =~ /\-$/); 152 152 153 my $curLen = length($line->{$ii}); 153 154 if ($curLen <= $cutOffLen) { 154 155 $newText .= $lines->[$ii] . "\n";