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