yet another session problem
José Ronquillo
josrr at ymail.com
Thu Mar 20 22:36:35 UTC 2014
Also, i don't understand why session-value does not return the saved string value but generates the "internal error", try this:
(defun f ()
(let ((username (hunchentoot:parameter "username"))
(session (or hunchentoot:*session* (hunchentoot:start-session))))
(if username
(setf (hunchentoot:session-value 'sessu session) username))
(format 'nil "session:~a value:~a~%"
session
(hunchentoot:session-value 'sessu session))))
First send the username:
http://127.0.0.1:5050/l?username=jose
after that, get the saved session value
http://127.0.0.1:5050/l
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/tbnl-devel/attachments/20140320/37218c0e/attachment.html>
More information about the Tbnl-devel
mailing list