diff options
Diffstat (limited to 'vampire.lisp')
| -rw-r--r-- | vampire.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vampire.lisp b/vampire.lisp index 85eed95..e089b0d 100644 --- a/vampire.lisp +++ b/vampire.lisp @@ -81,7 +81,7 @@ (lambda (obj) (declare (ignore obj)) (let ((u (new-user :name (value name)))) - (setf (user-key (window body)) (key u)) + (setf (session-key (window body)) (key u)) (setf (url (location body)) "/")))))) (defun main (body) |