Removed unit BoldOSSMessage #24

Embarcadero · Dec 7, 2024 · 6d9e32c · 6d9e32c
1 parent 3783251
commit 6d9e32c
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 413 deletions.
diff --git a/Source/BoldOSSMessage.pas b/Source/BoldOSSMessage.pas
diff --git a/Source/BoldSnooper.pas b/Source/BoldSnooper.pas
@@ -6,6 +6,7 @@
 interface
 
 uses
+  Classes,
   BoldAbstractSnooper,
   BoldPropagatorInterfaces_TLB,
   BoldDefs,
@@ -42,7 +43,6 @@ implementation
 uses
   Sysutils,
   Variants,
-  Classes,
   BoldPropagatorConstants,
   BoldLockingDefs,
   BoldUtils,
@@ -82,10 +82,10 @@ procedure TBoldSnooper.TransmitEvents(const ClientID: TBoldClientID);
       try
         if (Events.Count <> 0) then
           CheckError(Propagator.SendEvents(ClientID, StringListToVarArray(Events)), 'SendEvents');
-        if (Subscriptions.Count <> 0) then
-          CheckError(Propagator.AddSubscriptions(ClientID, StringListToVarArray(Subscriptions)), 'AddSubscriptions');
-        if (CancelledSubscriptions.Count <> 0) then
-          CheckError(Propagator.CancelSubscriptions(ClientID, StringListToVarArray(CancelledSubscriptions)), 'CancelSubscriptions');
+//        if (Subscriptions.Count <> 0) then
+//          CheckError(Propagator.AddSubscriptions(ClientID, StringListToVarArray(Subscriptions)), 'AddSubscriptions');
+//        if (CancelledSubscriptions.Count <> 0) then
+//          CheckError(Propagator.CancelSubscriptions(ClientID, StringListToVarArray(CancelledSubscriptions)), 'CancelSubscriptions');
       except on E: EOleSysError do
         DoPropagatorFailure(self, E.Message);
       end;