cl-rw

commit 7461c6755c5c15083be5aa902caa09bd0019ee74
parent dc07ae35737f58cbac09f2054f1eeabccb4dbe25
Author: Tomas Hlavaty <tom@logand.com>
Date:   Thu, 16 Apr 2015 21:03:06 +0200

porting fix

Diffstat:
M
socket.lisp
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/socket.lisp b/socket.lisp
@@ -294,7 +294,7 @@
     (sb-bsd-sockets:socket-bind
      x
      (car (sb-bsd-sockets:host-ent-addresses
-           (sb-bsd-sockets:get-host-by-name local-host)))
+           (sb-bsd-sockets:get-host-by-name (ipv4-address-string local-host))))
      local-port)
     (sb-bsd-sockets:socket-listen x (or backlog 5))
     x)