<html><body><div style="color:#000; background-color:#fff; font-family:HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif;font-size:10pt"><div id="yiv4265486690"><div><div style="background-color: rgb(255, 255, 255); font-family: HelveticaNeue, 'Helvetica Neue', Helvetica, Arial, 'Lucida Grande', sans-serif;"><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14" style="color: rgb(0, 0, 0); font-family: HelveticaNeue, 'Helvetica Neue', Helvetica, Arial, 'Lucida Grande', sans-serif; font-size: 10pt;"><span id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_20">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:</span></div><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14" style="color: rgb(0, 0, 0); font-family: HelveticaNeue, 'Helvetica Neue', Helvetica, Arial, 'Lucida Grande', sans-serif; font-size:
10pt;"><span><br></span></div><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14"><span><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14">(defun f ()</div><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14"> (let ((username (hunchentoot:parameter "username"))</div><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14"><span class="Apple-tab-span" style="white-space:pre"> </span>(session (hunchentoot:start-session)))</div><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14"> (format t "session:~s~%" session)</div><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14"> (setf (hunchentoot:session-value 'sessu session) username)</div><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14"> (hunchentoot:session-value 'sessu session)))</div><div id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_14"><br></div></span></div><div class="yiv4265486690yqt2240060031" id="yiv4265486690yqt97252"
style="color: rgb(0, 0, 0); font-family: HelveticaNeue, 'Helvetica Neue', Helvetica, Arial, 'Lucida Grande', sans-serif; font-size: 10pt;"><div class="yiv4265486690yahoo_quoted" id="yiv4265486690yui_3_13_0_ym1_8_1395344163701_16" style="display: block;"> <br clear="none"> <br clear="none"> <div class="yiv4265486690yui_3_13_0_ym1_1_1395344163701_5452" style="font-family: HelveticaNeue, 'Helvetica Neue', Helvetica, Arial, 'Lucida Grande', sans-serif; font-size: 10pt;"> <div class="yiv4265486690yui_3_13_0_ym1_1_1395344163701_5453" style="font-family: HelveticaNeue, 'Helvetica Neue', Helvetica, Arial, 'Lucida Grande', sans-serif; font-size: 12pt;"> <div dir="ltr"> <font size="2" face="Arial"> On Thursday, March 20, 2014 3:29 PM, Faruk S. Can <farukscan@gmail.com> wrote:<br clear="none"> </font> </div> <div class="yiv4265486690y_msg_container"><div id="yiv4265486690"><div><div dir="ltr"><div class="yiv4265486690gmail_default
yiv4265486690yui_3_13_0_ym1_1_1395344163701_5455" style="font-family: tahoma, sans-serif; font-size: small;">and with page.html:</div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5456" style="font-family: tahoma, sans-serif; font-size: small;"><div class="yiv4265486690gmail_default">
<html></div><div class="yiv4265486690gmail_default"><body></div><div class="yiv4265486690gmail_default"><form action="/l" method="get"></div><div class="yiv4265486690gmail_default"><span style="white-space:pre-wrap;"> </span><input type="text" name="username" </input></div>
<div class="yiv4265486690gmail_default"><span style="white-space:pre-wrap;"> </span><input type="submit" </input></div><div class="yiv4265486690gmail_default"></form></div><div class="yiv4265486690gmail_default"></body></div><div class="yiv4265486690gmail_default">
</html></div></div><div class="yiv4265486690gmail_extra"><br clear="none"><br clear="none"><div class="yiv4265486690gmail_quote">2014-03-20 23:08 GMT+02:00 Faruk S. Can <span dir="ltr"><<a rel="nofollow" shape="rect" ymailto="mailto:farukscan@gmail.com" target="_blank" href="mailto:farukscan@gmail.com">farukscan@gmail.com</a>></span>:<br clear="none">
<div class="yiv4265486690yqt5550965335" id="yiv4265486690yqt82490"><blockquote class="yiv4265486690gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"><div dir="ltr"><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5460" style="font-family: tahoma, sans-serif; font-size: small;">no offense.</div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5461" style="font-family: tahoma, sans-serif; font-size: small;">
I need help on hunchentoot session topic.</div>
<div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5462" style="font-family: tahoma, sans-serif; font-size: small;">whether I am doing a very simple mistake,</div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5463" style="font-family: tahoma, sans-serif; font-size: small;">or there is an issue.</div>
<div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5464" style="font-family: tahoma, sans-serif; font-size: small;">I do not need do not send your code</div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5465" style="font-family: tahoma, sans-serif; font-size: small;">and beg for help to solicit help</div>
<div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5466" style="font-family: tahoma, sans-serif; font-size: small;">as somebody has told days before</div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5467" style="font-family: tahoma, sans-serif; font-size: small;">this is very basically should work as I am expecting.</div>
<div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5468" style="font-family: tahoma, sans-serif; font-size: small;">It is very simple.</div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5469" style="font-family: tahoma, sans-serif; font-size: small;">to ensure installs are done:</div>
<div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5470" style="font-family: tahoma, sans-serif; font-size: small;">
<br clear="none"></div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5471" style="font-family: tahoma, sans-serif; font-size: small;">(ql:quickload '(:hunchentoot))<br clear="none"></div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5472" style="font-family: tahoma, sans-serif; font-size: small;">(hunchentoot:start (make-instance 'hunchentoot:easy-acceptor :port 5050))<br clear="none">
</div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5473" style="font-family: tahoma, sans-serif; font-size: small;"><br clear="none"></div><div class="yiv4265486690gmail_default yiv4265486690yui_3_13_0_ym1_1_1395344163701_5474" style="font-family: tahoma, sans-serif; font-size: small;"><div class="yiv4265486690gmail_default">(defun f ()</div>
<div class="yiv4265486690gmail_default"> (let ((username (hunchentoot:parameter "username")))</div><div class="yiv4265486690gmail_default"> (hunchentoot:start-session)</div><div class="yiv4265486690gmail_default"> (setf (hunchentoot:session-value 'sessu) username)</div>
<div class="yiv4265486690gmail_default"> (hunchentoot:session-value 'sessu)))</div><div class="yiv4265486690gmail_default"><br clear="none"></div><div class="yiv4265486690gmail_default">(push (hunchentoot:create-prefix-dispatcher "/l" 'f) hunchentoot:*dispatch-table*)<br clear="none">
</div><div class="yiv4265486690gmail_default"><br clear="none"></div><div class="yiv4265486690gmail_default">(push (hunchentoot:create-static-file-dispatcher-and-handler "/" "/Users/faruk/desktop/page.html") hunchentoot:*dispatch-table*)<br clear="none">
</div></div></div>
</blockquote></div></div><br clear="none"></div></div></div></div><br clear="none"><br clear="none"></div> </div> </div> </div></div> </div></div></div></div></body></html>