Server setup should read the server configuration, not the client one

lmj · Mar 15, 2013 · 81d197f · 81d197f
1 parent a2abc75
commit 81d197f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lfarm-ssl/lfarm-ssl.lisp b/lfarm-ssl/lfarm-ssl.lisp
@@ -26,7 +26,7 @@
                                    :password (cert-data-password d))))
 
 (defmethod lfarm-common.data-transport:initialize-server-stream ((auth ssl-auth) stream)
-  (let ((d (ssl-auth-client-cert-data auth)))
+  (let ((d (ssl-auth-server-cert-data auth)))
     (cl+ssl:make-ssl-server-stream stream
                                    :certificate (cert-data-path d)
                                    :key (cert-data-key d)