Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* Fix bug #34463, CMAP with 1 entry is ignored. Patch by Petr Kristan.

git-svn-id: trunk@40054 -
michael 6 years ago
parent
c8bc9202f7
commit
68f74289e1
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      packages/fcl-pdf/src/fpparsettf.pp

+ 1 - 1
packages/fcl-pdf/src/fpparsettf.pp
View File 

@@ -532,7 +532,7 @@ begin
 
     FSubtables[i].Offset:=ReadUInt32(AStream); // 4 bytes - Offset of subtable
 
     FSubtables[i].Offset:=ReadUInt32(AStream); // 4 bytes - Offset of subtable
 
     end;
 
     end;
 
   UE:=FCMapH.SubtableCount-1;
 
   UE:=FCMapH.SubtableCount-1;
 
-  if UE=0 then
 
+  if UE=-1 then
 
     // No CMap subtable entries, this is not an error, just exit.
 
     // No CMap subtable entries, this is not an error, just exit.
 
     exit;
 
     exit;
 
   While (UE>=0) and ((FSubtables[UE].PlatformID<>3) or (FSubtables[UE].EncodingID<> 1)) do
 
   While (UE>=0) and ((FSubtables[UE].PlatformID<>3) or (FSubtables[UE].EncodingID<> 1)) do