mirror of
https://github.com/vale981/lack
synced 2025-03-06 01:41: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))))
|
(dbi-store-table-name store))))
|
||||||
(result (dbi:fetch (dbi:execute query sid))))
|
(result (dbi:fetch (dbi:execute query sid))))
|
||||||
(if result
|
(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)))
|
nil)))
|
||||||
|
|
||||||
(defmethod store-session ((store dbi-store) sid session)
|
(defmethod store-session ((store dbi-store) sid session)
|
||||||
|
|
Loading…
Add table
Reference in a new issue