anchor.diff:    // Last gasp, if we are in a development situation
     Result := GetEnvironmentVariable(KEYMAN_ROOT);
     if Result <> '' then
  +  begin
       Result := IncludeTrailingPathDelimiter(Result) + DEV_SENTRY_PATH;
  +    if (Result <> '') and FileExists(Result) then
  +      Exit;
  +  end;
  +
  +  Result := '';
   end;
   
   procedure TKeymanSentryClient.ClientAfterEvent(Sender: TObject;
  
positive.code:   reg: TRegistry;
    o: TSentryClientOptions;
    f: TSentryClientFlags;
    RegKey: string;
  begin
    Assert(not Assigned(FInstance));
  
  
negative.code:   if not Enabled then
      Exit;
  
    path := FindSentryDLL;
    if path = '' then
      // Cannot find sentry.dll
      Exit;
  
    sentry_set_library_path(path);
  
    o.Debug := False;
  
  