steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

io.sockets.secure.openssl: second |dispose seem to be redundant

char-rename
Björn Lindqvist 2016-11-19 18:04:17 +01:00
parent cc6f03f5b5
commit 1b7b7e8260
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/io/sockets/secure/openssl/openssl.factor
View File

@ -204,7 +204,7 @@ SYMBOL: default-secure-context
: <ssl-handle> ( fd -- ssl ) : <ssl-handle> ( fd -- ssl )
[ [
ssl-handle new-disposable |dispose ssl-handle new-disposable |dispose
current-secure-context handle>> SSL_new |dispose current-secure-context handle>> SSL_new
dup ssl-error >>handle dup ssl-error >>handle
swap >>file swap >>file
set-secure-cipher-list-only set-secure-cipher-list-only