From 5d3502088a30277c5ba9b0b77df01b5b4e066d92 Mon Sep 17 00:00:00 2001
From: Stelian Ionescu <sionescu@common-lisp.net>
Date: Thu, 18 Jan 2007 14:16:41 +0100
Subject: [PATCH] Exporting SOCKET-CONNECTED-P.

---
 sockets/defpackage.lisp | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/sockets/defpackage.lisp b/sockets/defpackage.lisp
index 839f306..4ba1a42 100644
--- a/sockets/defpackage.lisp
+++ b/sockets/defpackage.lisp
@@ -99,6 +99,7 @@
    #:socket-lisp-stream #:get-socket-option #:set-socket-option
    #:socket-type #:make-socket #:socket-close #:socket-open-p
    #:socket-non-blocking-mode #:local-name #:remote-name
-   #:bind-address #:socket-listen #:accept-connection #:connect
-   #:shutdown #:socket-send  #:socket-receive #:unconnect
+   #:bind-address #:socket-listen #:accept-connection
+   #:connect  #:unconnect #:socket-connected-p
+   #:shutdown #:socket-send  #:socket-receive
 ))
-- 
2.11.4.GIT