[gnutls-devel] [PATCH 2/3] guile: Test 'set-session-transport-fd!'.

[Ludovic Courtès]

* guile/tests/session-record-port.scm: Use 'set-session-transport-fd!'
on the server side.
---
 guile/tests/session-record-port.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guile/tests/session-record-port.scm b/guile/tests/session-record-port.scm
index 0eafefa..8764d43 100644
--- a/guile/tests/session-record-port.scm
+++ b/guile/tests/session-record-port.scm
@@ -83,7 +83,7 @@
        (let ((server (make-session connection-end/server)))
          (set-session-priorities! server priorities)
 
-         (set-session-transport-port! server (cdr socket-pair))
+         (set-session-transport-fd! server (fileno (cdr socket-pair)))
          (let ((cred (make-anonymous-server-credentials))
                (dh-params (import-dh-params "dh-parameters.pem")))
            ;; Note: DH parameter generation can take some time.
-- 
2.10.0