paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-07 05:50:41 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Small improvement, comment about default_priority

Browse Source 
git-svn-id: trunk@40787 -
This commit is contained in:
michael 2019-01-06 16:41:17 +00:00
parent 8d4102a927
commit 509020991f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/gnutls/examples/httpget.pp
View File

@ -76,8 +76,8 @@ begin
gnutls_global_set_log_level(logLevel);
end;
gnutls_init(@session, GNUTLS_CLIENT);
// gnutls_priority_set_direct(session,'PERFORMANCE:+ANON-ECDH:+ANON-DH',Nil);
// ret:=gnutls_set_default_priority(session);
// We can also use
// ret:=gnutls_set_default_priority(session);
ret := gnutls_priority_set_direct(session, 'NORMAL', @errptr);
if (ret <> GNUTLS_E_SUCCESS) then
begin