瀏覽代碼

GetPendingBufferOperations bug

PascalCoin 7 年之前
父節點
當前提交
9c5a2e09ab
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      src/core/UFileStorage.pas

+ 1 - 1
src/core/UFileStorage.pas

@@ -309,7 +309,7 @@ begin
   Try
     fs := GetPendingBufferOperationsStream;
     fs.Position:=0;
-    If OperationsHashTree.LoadOperationsHashTreeFromStream(fs,true,CT_PROTOCOL_2,Nil,errors) then begin
+    If OperationsHashTree.LoadOperationsHashTreeFromStream(fs,true,CT_PROTOCOL_3,Nil,errors) then begin
       TLog.NewLog(ltInfo,ClassName,Format('DoLoadPendingBufferOperations loaded operations:%d',[OperationsHashTree.OperationsCount]));
     end else TLog.NewLog(ltError,ClassName,Format('DoLoadPendingBufferOperations ERROR: loaded operations:%d errors:%s',[OperationsHashTree.OperationsCount,errors]));
   finally