Browse Source

* Fix compilation under unicode rtl

Michaël Van Canneyt 1 year ago
parent
commit
de5b2c5192
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fcl-web/src/websocket/fpcustwsserver.pp

+ 1 - 1
packages/fcl-web/src/websocket/fpcustwsserver.pp

@@ -24,7 +24,7 @@ interface
 
 
 {$IFDEF FPC_DOTTEDUNITS}
 {$IFDEF FPC_DOTTEDUNITS}
 uses
 uses
-  System.Classes, System.SysUtils, System.Net.Ssockets, Fcl.ThreadPool, FpWeb.WebSocket.Protocol;
+  System.Classes, System.SysUtils, System.Contnrs, System.Net.Ssockets, Fcl.ThreadPool, FpWeb.WebSocket.Protocol;
 {$ELSE FPC_DOTTEDUNITS}
 {$ELSE FPC_DOTTEDUNITS}
 uses
 uses
   Classes, SysUtils, Contnrs,
   Classes, SysUtils, Contnrs,