anchor.diff:  begin
     try
       if assigned(FDelphiLens) then
  -      Task.SetTimer(CTimerRescan, CTimerRescanDelay_ms, @TDelphiLensUIWorker.Rescan);
  +      Task.SetTimer(CTimerRescan, CTimerRescanDelay_ms, @TDelphiLensUIWorker.TimerRescan);
     except
       on E:Exception do
         ReportException('ScheduleRescan', E);
  
positive.code: begin
    try
      FScanID.Increment;
      (msg.MsgData.AsInterface as IOmniWaitableValue).Signal(FScanID.Value);
      if not assigned(FDelphiLens) then
        Exit;
  
  
negative.code:   end;
  end; { TDelphiLensUIWorker.FileModified }
  
  function TDelphiLensUIWorker.Initialize: boolean;
  begin
    Result := inherited Initialize;
  