Convert condition to list.

This commit is contained in:
Dominik Pantůček 2024-01-16 22:01:27 +01:00
parent 65c7155ba3
commit 3629844743

View file

@ -74,8 +74,8 @@
(handle-exceptions
exn
(let ()
(log-warning "DokuWiki (~A) exception ~A" fname exn)
(stdout-printf "DokuWiki (~A) exception ~A" fname exn)
(log-warning "DokuWiki (~A) exception ~A" fname (condition->list exn))
(stdout-printf "DokuWiki (~A) exception ~A" fname (condition->list exn))
'())
(with-input-from-file fname
parse-dokuwiki-users-auth)))