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

2016-11-19 18:04:17 +01:00 · 2016-11-19 18:04:17 +01:00 · 1b7b7e8260
parent cc6f03f5b5
commit 1b7b7e8260
1 changed files with 1 additions and 1 deletions
--- a/basis/io/sockets/secure/openssl/openssl.factor
+++ b/basis/io/sockets/secure/openssl/openssl.factor
@ -204,7 +204,7 @@ SYMBOL: default-secure-context
 : <ssl-handle> ( fd -- ssl )
    [
        ssl-handle new-disposable |dispose
-        current-secure-context handle>> SSL_new |dispose
+        current-secure-context handle>> SSL_new
        dup ssl-error >>handle
        swap >>file
        set-secure-cipher-list-only