Improved the HANDLE-CHECKID-SETUP documentation a little
Mon Aug 15 13:22:30 PDT 2011 Anton Vodonosov <avodonosov@yandex.ru>
* Improved the HANDLE-CHECKID-SETUP documentation a little
diff -rN -u old-cl-openid/README.html new-cl-openid/README.html
--- old-cl-openid/README.html 2014-07-23 09:11:07.000000000 -0700
+++ new-cl-openid/README.html 2014-07-23 09:11:07.000000000 -0700
@@ -7,7 +7,7 @@
<title>CL-OpenID</title>
<meta http-equiv="Content-Type" content="text/html;charset=utf-8"/>
<meta name="generator" content="Org-mode"/>
-<meta name="generated" content="2011-07-12 02:39:44 "/>
+<meta name="generated" content="2011-08-15 23:19:06 "/>
<meta name="author" content="Maciej Pasternacki"/>
<meta name="description" content=""/>
<meta name="keywords" content=""/>
@@ -757,12 +757,16 @@
<code>CANCEL-RESPONSE-URI</code>.
</p>
<p>
-This generic is called by <code>HANDLE-OPENID-PROVIDER-REQUEST</code>.
-The value(s) returned by this function are then returned by
-<code>HANDLE-OPENID-PROVIDER-REQUEST</code>.
+This generic is called by <code>HANDLE-OPENID-PROVIDER-REQUEST</code>, and
+the values returned by this function are then returned by
+<code>HANDLE-OPENID-PROVIDER-REQUEST</code>. I.e. it must return two values:
+response \"body\" and HTTP status code. That way <code>HANDLE-CHECKID-SETUP</code>
+can either redirect user's browser somewhere, or just show him
+something. (With hunchentoot, <code>HUNCHNTOOT:REDIRECT</code>
+may also be used, which is a non-local transfer control).
</p>
<p>
-Default method just returns (VALUES <code>CANSEL-RESPONSE-URI</code> <code>+INDIRECT-RESPONSE-CODE+</code>).
+Default method just returns (VALUES (<code>CANSEL-RESPONSE-URI</code> &hellip;) <code>+INDIRECT-RESPONSE-CODE+</code>).
</p>
</div>
@@ -870,7 +874,7 @@
<div id="postamble">
<p class="author"> Author: Maciej Pasternacki
</p>
-<p class="date"> Date: 2011-07-12 02:39:44 </p>
+<p class="date"> Date: 2011-08-15 23:19:06 </p>
<p class="creator">HTML generated by org-mode 6.36c in emacs 23</p>
</div>
</div>
diff -rN -u old-cl-openid/README.org new-cl-openid/README.org
--- old-cl-openid/README.org 2014-07-23 09:11:07.000000000 -0700
+++ new-cl-openid/README.org 2014-07-23 09:11:07.000000000 -0700
@@ -261,11 +261,15 @@
user's browser either to =SUCCESSFUL-RESPONSE-URI=, or to
=CANCEL-RESPONSE-URI=.
- This generic is called by =HANDLE-OPENID-PROVIDER-REQUEST=.
- The value(s) returned by this function are then returned by
- =HANDLE-OPENID-PROVIDER-REQUEST=.
+ This generic is called by =HANDLE-OPENID-PROVIDER-REQUEST=, and
+ the values returned by this function are then returned by
+ =HANDLE-OPENID-PROVIDER-REQUEST=. I.e. it must return two values:
+ response \"body\" and HTTP status code. That way =HANDLE-CHECKID-SETUP=
+ can either redirect user's browser somewhere, or just show him
+ something. (With hunchentoot, =HUNCHNTOOT:REDIRECT=
+ may also be used, which is a non-local transfer control).
- Default method just returns (VALUES =CANSEL-RESPONSE-URI= =+INDIRECT-RESPONSE-CODE+=).
+ Default method just returns (VALUES (=CANSEL-RESPONSE-URI= ...) =+INDIRECT-RESPONSE-CODE+=).
*** Protocol messages
Messages passed between OpenID Provider and the Relying Party are
diff -rN -u old-cl-openid/src/provider.lisp new-cl-openid/src/provider.lisp
--- old-cl-openid/src/provider.lisp 2014-07-23 09:11:07.000000000 -0700
+++ new-cl-openid/src/provider.lisp 2014-07-23 09:11:07.000000000 -0700
@@ -198,11 +198,16 @@
user's browser either to SUCCESSFUL-RESPONSE-URI, or to
CANCEL-RESPONSE-URI.
-This generic is called by HANDLE-OPENID-PROVIDER-REQUEST.
-The value(s) returned by this function are then returned by
-HANDLE-OPENID-PROVIDER-REQUEST.
+This generic is called by HANDLE-OPENID-PROVIDER-REQUEST, and
+the values returned by this function are then returned by
+HANDLE-OPENID-PROVIDER-REQUEST. I.e. it must return two values:
+response \"body\" and HTTP status code. That way HANDLE-CHECKID-SETUP
+can either redirect user's browser somewhere, or just show him
+something. (With hunchentoot, HUNCHNTOOT:REDIRECT
+may also be used, which is a non-local transfer control).
+
+Default method just returns (VALUES (CANSEL-RESPONSE-URI ...) +INDIRECT-RESPONSE-CODE+).")
-Default method just returns (VALUES CANSEL-RESPONSE-URI +INDIRECT-RESPONSE-CODE+).")
(:method (op message)
(if (message-field message "openid.return_to")
(values (cancel-response-uri op message) +indirect-response-code+)