diff options
Diffstat (limited to 'lisp/webapps/webapp-loader.lisp')
| -rw-r--r-- | lisp/webapps/webapp-loader.lisp | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/webapps/webapp-loader.lisp b/lisp/webapps/webapp-loader.lisp index 5ac5b1c..6b1775b 100644 --- a/lisp/webapps/webapp-loader.lisp +++ b/lisp/webapps/webapp-loader.lisp @@ -158,9 +158,7 @@ with the new one." (let* ((*webapp* (get-webapp ,package)) (*uri* ,uri) (*header-register* (make-instance 'org-ckons-session::header-register)) - (*sessionid* (progn - (run-garbage-collect-cycle) - (ensure-user-session-exists)))) + (*sessionid* (ensure-user-session-exists))) (ensure-user-exists) (setf output (,page-function ,@args)) (org-ckons-session::ship-headers *header-register*)) |