diff --git a/src/dokuwiki.scm b/src/dokuwiki.scm index c246fe7..ca6d6e3 100644 --- a/src/dokuwiki.scm +++ b/src/dokuwiki.scm @@ -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)))