Jelajahi Sumber

* Fix AV when parsing list

Michaël Van Canneyt 3 minggu lalu
induk
melakukan
501226c0f4
1 mengubah file dengan 4 tambahan dan 1 penghapusan
  1. 4 1
      packages/fcl-md/src/markdown.processors.pas

+ 4 - 1
packages/fcl-md/src/markdown.processors.pas

@@ -642,7 +642,10 @@ var
 begin
   lOldLastList:=FLastList;
   if inList(aParent.blocks, true, FMarker, Findent, 2, lList) then
-    lList.lastIndent:=FIndent
+    begin
+    lList.lastIndent:=FIndent;
+    FLastList:=lList;
+    end
   else
     begin
     lList:=TMarkDownListBlock.Create(aParent,aLine.LineNo);