yet another session problem

José Ronquillo josrr at ymail.com
Thu Mar 20 22:09:43 UTC 2014


Hello again Faruk, I think the symbol *session* is not bound immediately after calling the function start-session, but the function returns it; this code works:

(defun f ()
  (let ((username (hunchentoot:parameter "username"))
(session (hunchentoot:start-session)))
    (format t "session:~s~%" session)
    (setf (hunchentoot:session-value 'sessu session) username)
    (hunchentoot:session-value 'sessu session)))




On Thursday, March 20, 2014 3:29 PM, Faruk S. Can <farukscan at gmail.com> wrote:
 
and with page.html:
<html>
<body>
<form action="/l" method="get">
<input type="text" name="username" </input>
<input type="submit" </input>
</form>
</body>
</html>



2014-03-20 23:08 GMT+02:00 Faruk S. Can <farukscan at gmail.com>:

no offense.
>I need help on hunchentoot session topic.
>whether I am doing a very simple mistake,
>or there is an issue.
>I do not need do not send your code
>and beg for help to solicit help
>as somebody has told days before
>this is very basically should work as I am expecting.
>It is very simple.
>to ensure installs are done:
>
>
>(ql:quickload '(:hunchentoot))
>
>(hunchentoot:start (make-instance 'hunchentoot:easy-acceptor :port 5050))
>
>
>
>(defun f ()
>  (let ((username (hunchentoot:parameter "username")))
>    (hunchentoot:start-session)
>    (setf (hunchentoot:session-value 'sessu) username)
>    (hunchentoot:session-value 'sessu)))
>
>
>(push (hunchentoot:create-prefix-dispatcher "/l" 'f) hunchentoot:*dispatch-table*)
>
>
>
>(push (hunchentoot:create-static-file-dispatcher-and-handler "/" "/Users/faruk/desktop/page.html") hunchentoot:*dispatch-table*)
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/tbnl-devel/attachments/20140320/4ed6b002/attachment.html>


More information about the Tbnl-devel mailing list