Browse Source

CoreUtils: datasources update

Herman Schoenfeld 7 years ago
parent
commit
938683b88e
1 changed files with 2 additions and 1 deletions
  1. 2 1
      src/core.utils/UDataSources.pas

+ 2 - 1
src/core.utils/UDataSources.pas

@@ -347,6 +347,7 @@ var
     // note: FAccounts is never empty
     LAccFetchID := Length(FAccounts).ToString + FAccounts[Low(FAccounts)].ToString + FAccounts[High(FAccounts)].ToString;
     Result := LAccFetchID + FBlockDepth.ToString + TCrypto.ToHexaString(LNode.Bank.SafeBox.SafeBoxHash);
+
   end;
 
 begin
@@ -363,7 +364,7 @@ begin
     LFetchID := ComputeFetchID;
     if LFetchID <> FLastFetchID then begin
       FLastFetchID := LFetchID;
-      FLastFetchBlockOperations := LNode.GetStoredOperationsAffectingAccounts(FAccounts, LBlockDepth, 0, MaxInt, True);
+      FLastFetchBlockOperations := LNode.GetStoredOperationsAffectingAccounts(FAccounts, LBlockDepth, 0, MaxInt);
     end;
     AContainer.AddRange( FLastFetchBlockOperations );
   finally