[fpc-pascal] Websocket

[Sven Harazim]

>> I noticed something while looking at this: 
>> TCertificateData.Assign in packages/fcl-net/src/sslbase.pp copies 
>> FStrData and the five TSSLData members but not FTrustedCertsDir, 
>> which opensslsockets.pp does read. I can submit a separate report for that.

> Yes, please. It was added later on, if memory serves well, and the assign
> was probably forgotten.

https://gitlab.com/freepascal.org/fpc/source/-/work_items/41902

Sven