diff --git a/basis/io/sockets/secure/openssl/openssl.factor b/basis/io/sockets/secure/openssl/openssl.factor
index 21d026bd14..86aaac1671 100644
--- 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