mirror of
https://github.com/vale981/lack
synced 2025-03-05 09:21:39 -05:00
Show warnings when deserializing a session failed.
This commit is contained in:
parent
13677d3ad2
commit
3a74575651
1 changed files with 7 additions and 1 deletions
|
@ -31,7 +31,13 @@
|
|||
(dbi-store-table-name store))))
|
||||
(result (dbi:fetch (dbi:execute query sid))))
|
||||
(if result
|
||||
(ignore-errors (funcall (dbi-store-deserializer store) (getf result :|session_data|)))
|
||||
(handler-case (funcall (dbi-store-deserializer store) (getf result :|session_data|))
|
||||
(error (e)
|
||||
(warn "Error (~A) occured while deserializing a session. Ignoring.~2% Data:~% ~A~2% Error:~% ~A"
|
||||
(class-name (class-of e))
|
||||
(getf result :|session_data|)
|
||||
e)
|
||||
nil))
|
||||
nil)))
|
||||
|
||||
(defmethod store-session ((store dbi-store) sid session)
|
||||
|
|
Loading…
Add table
Reference in a new issue