Add simple formatting module.

src/reminders.scm

@@ -37,14 +37,15 @@
 	 member-record
 	 util-mail
 	 util-dict-list
-	 members-payments)
+	 members-payments
+	 util-format)
 
  ;; Creates reminder email body
  (define (reminder-email-body mr)
    (list
     (member-format "Ahoj ~N," mr)
     "podle evidence členů a bankovního účtu to vypadá, že máš nedoplatek"
-    (format "ve výši ~A Kč." (member-total-balance mr))
+    (format "ve výši ~A Kč." (format-amount (member-total-balance mr)))
     "Zkontroluj, prosím, zda tvé platby členských příspěvků"
     (member-format "s variabilním symbolem ~I byly zaslány na" mr)
     "správný účet 1234/2010"