Browse Source

fcl-js: fixed jssrcmap load xssi header

git-svn-id: trunk@43327 -
Mattias Gaertner 5 years ago
parent
commit
4c6b5dc3ad
1 changed files with 3 additions and 1 deletions
  1. 3 1
      packages/fcl-js/src/jssrcmap.pas

+ 3 - 1
packages/fcl-js/src/jssrcmap.pas

@@ -1118,7 +1118,9 @@ begin
   SetLength(s,aStream.Size-aStream.Position);
   SetLength(s,aStream.Size-aStream.Position);
   if s<>'' then
   if s<>'' then
     aStream.Read(s[1],length(s));
     aStream.Read(s[1],length(s));
-  if LeftStr(s,3)=')]}' then
+  if LeftStr(s,4)=')]}''' then
+    Delete(s,1,4)
+  else if LeftStr(s,3)=')]}' then
     Delete(s,1,3);
     Delete(s,1,3);
   P:=TJSONParser.Create(s,[joUTF8]);
   P:=TJSONParser.Create(s,[joUTF8]);
   try
   try