From 65c7155ba3bff39749e03c0c1246f86fe25f94ff Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dominik=20Pant=C5=AF=C4=8Dek?= Date: Tue, 16 Jan 2024 21:58:30 +0100 Subject: [PATCH] Log exception details. --- src/dokuwiki.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/dokuwiki.scm b/src/dokuwiki.scm index db944ce..c246fe7 100644 --- a/src/dokuwiki.scm +++ b/src/dokuwiki.scm @@ -74,8 +74,8 @@ (handle-exceptions exn (let () - (log-warning "DokuWiki: cannot open ~A" fname) - (stdout-printf "DokuWiki: cannot open ~A" fname) + (log-warning "DokuWiki (~A) exception ~A" fname exn) + (stdout-printf "DokuWiki (~A) exception ~A" fname exn) '()) (with-input-from-file fname parse-dokuwiki-users-auth)))