Hi Henrik, now I think I see one of the reasons for the unexpected behavior of your application:
> Currently I'm using the following to determine whether the session has > timed out or not: > > (de getUsr () > (db 'uid '+User (cdr (assoc 'uid *Cookies)))) > > (de usrQuit () > (let Usr (getUsr) > (or Usr (redir "@logout")))) > ... > (de start () (if (getUsr) (desktop) (signin))) In the code you've sent me, the 'desktop' function is (de desktop () (html 0 "Viz Reader" *Css NIL (when (usrQuit) (prin "You're now logged in.")) ) ) However, 'usrQuit' will always return non-NIL, because even when 'Usr' is NIL in (or Usr (redir "@logout")) the return value of 'redir' is always non-NIL. Better might be (unless Usr (redir "@logout") ) Cheers, - Alex -- UNSUBSCRIBE: mailto:picol...@software-lab.de?subject=unsubscribe