Permalink
Browse files

silence warning on LispWorks

  • Loading branch information...
1 parent f69466a commit 73e44276a351ae033b52c03fea262548cdf002b1 @hanshuebner hanshuebner committed Feb 25, 2014
Showing with 5 additions and 2 deletions.
  1. +1 −1 doc/index.xml
  2. +4 −1 request.lisp
View
@@ -796,7 +796,7 @@ T</span>
<clix:arg>max-depth</clix:arg>,
<clix:arg>ca-file</clix:arg> and
<clix:arg>ca-directory</clix:arg> parameters are ignored
- for non-SSL requests.
+ for non-SSL requests. They are also ignored on LispWorks.
</p>
<p>
<a name="arg-parameters"/>
View
@@ -279,7 +279,8 @@ CA-FILE and CA-DIRECTORY can be specified to set the certificate
authority bundle file or directory to use for certificate validation.
The CERTIFICATE, KEY, CERTIFICATE-PASSWORD, VERIFY, MAX-DEPTH, CA-FILE
-and CA-DIRECTORY parameters are ignored for non-SSL requests.
+and CA-DIRECTORY parameters are ignored for non-SSL requests. They
+are also ignored on LispWorks.
PARAMETERS is an alist of name/value pairs \(the car and the cdr each
being a string) which denotes the parameters which are added to the
@@ -467,6 +468,8 @@ the responsibility of the client to make sure that all parameters are
encoded properly. Note that if this parameter is given, and the
request is not a POST with a content-type of `multipart/form-data',
PARAMETERS will not be used."
+ #+lispworks
+ (declare (ignore certificate key certificate-password verify max-depth ca-file ca-directory))
(unless (member protocol '(:http/1.0 :http/1.1) :test #'eq)
(parameter-error "Don't know how to handle protocol ~S." protocol))
(setq uri (cond ((uri-p uri) (copy-uri uri))

0 comments on commit 73e4427

Please sign in to comment.