Commits

Vassilis Radis committed 2fd5af3

application.lisp: Fixed reset-webapp-session to reset session correctly by using session-key slot accessor instead of the fixed class-name value

  • Participants
  • Parent commits b448500

Comments (0)

Files changed (1)

src/application.lisp

 
 (defun reset-webapp-session (&optional (app (current-webapp)))
   "Reset sessions on a per-webapp basis"
-  (setf (session-value (class-name (class-of app))) nil))
+  (setf (session-value (webapp-session-key app)) nil))
 
 (defun webapp-application-dependencies (&optional (app (current-webapp)))
   "Returns a list of dependencies on scripts and/or stylesheets that