diff --git a/basis/io/sockets/secure/unix/unix.factor b/basis/io/sockets/secure/unix/unix.factor
index e1c5a5032a..b2faf280da 100644
--- a/basis/io/sockets/secure/unix/unix.factor
+++ b/basis/io/sockets/secure/unix/unix.factor
@@ -28,8 +28,7 @@ M: secure (server) addrspec>> (server) ;
 
 M: secure (accept)
     [
-        [ hostname>> ] [ addrspec>> ] bi (accept)
-        [ |dispose <ssl-socket> ] dip
+        addrspec>> (accept) [ |dispose f <ssl-socket> ] dip
     ] with-destructors ;
 
 : check-shutdown-response ( handle r -- event )