Fix return-from for session-verify.

master
User Hunchentoot 11 years ago
parent d3b5a1b58d
commit 4600b14725

@ -167,7 +167,7 @@ will not create a new one."
(unless (and session-identifier (unless (and session-identifier
(stringp session-identifier) (stringp session-identifier)
(plusp (length session-identifier))) (plusp (length session-identifier)))
(return-from session-verify nil)) (return-from hunchentoot:session-verify nil))
(destructuring-bind (id-string session-string) (destructuring-bind (id-string session-string)
(cl-ppcre:split ":" session-identifier :limit 2) (cl-ppcre:split ":" session-identifier :limit 2)
(let* ((id (parse-integer id-string)) (let* ((id (parse-integer id-string))

Loading…
Cancel
Save