diff --git a/src/export-web-static.scm b/src/export-web-static.scm
index 8ed8abc..4b0b15d 100644
--- a/src/export-web-static.scm
+++ b/src/export-web-static.scm
@@ -44,7 +44,8 @@
cal-day
util-git
configuration
- texts)
+ texts
+ logging)
;; HTML entities
(define (sanitize-html str)
@@ -100,7 +101,11 @@
(brmember-nick mr) "")
(print "
Member ID, Variable Symbol for Payments
(Členské číslo, variabilní symbol plateb)"
(brmember-id mr) "")
- (print "Balance in CZK
(Zůstatek v Kč)" (caar (reverse bhs)) "")
+ (print "Balance in CZK
(Zůstatek v Kč)"
+ (if (null? bhs)
+ "0"
+ (caar (reverse bhs)))
+ "")
(print "Account for Payments
(Účet pro platbu příspěvků)CZK: 2500079551/2010
EUR: CZ93 2010 0000 0021 0007 9552")
(print "")
(print "")