From 18aabcd8ce73249c6f46e75fae1eb3c62b56941e Mon Sep 17 00:00:00 2001 From: "Bill St. Clair" Date: Tue, 4 Oct 2011 15:50:51 -0400 Subject: [PATCH] Change 'server' to 'peer' in ssl-error-verify doc strings --- conditions.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/conditions.lisp b/conditions.lisp index 7b1d5b7..b870580 100644 --- a/conditions.lisp +++ b/conditions.lisp @@ -284,12 +284,12 @@ by READ-SSL-ERROR-QUEUE) or an SSL-ERROR condition." (define-condition ssl-error-verify (ssl-error) ((stream :initarg :stream :reader ssl-error-stream - :documentation "The SSL stream whose server certificate didn't verify.") + :documentation "The SSL stream whose peer certificate didn't verify.") (error-code :initarg :error-code :reader ssl-error-code - :documentation "The server certificate verification error code.")) + :documentation "The peer certificate verification error code.")) (:report (lambda (condition stream) (let ((code (ssl-error-code condition))) (format stream "SSL verify error: ~d~@[ ~a~]" code (ssl-verify-error-keyword code))))) - (:documentation "This condition is signalled on SSL connection when a server certificate doesn't verify.")) + (:documentation "This condition is signalled on SSL connection when a peer certificate doesn't verify."))