From e83e791a7ad8de32fc30b72122774265045651aa Mon Sep 17 00:00:00 2001
From: Benjamin Pollack <benjamin@bitquabit.com>
Date: Thu, 3 Mar 2016 16:40:50 -0500
Subject: [PATCH] Do not attempt to set an SNI hostname on a server

---
 basis/io/sockets/secure/unix/unix.factor | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

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 )