Use new cal-format for days and months.

src/members-print.scm

@@ -60,7 +60,8 @@
 	 members-fees
 	 members-payments
 	 brmember-format
-	 specification)
+	 specification
+	 cal-format)
 
  ;; Returns nicely formatted table
  (define (member-info->table mr)
@@ -97,7 +98,12 @@
 				   #:col-border #t)))
 			   ((credit)
 			    (list k 
-				  (table->string v
+				  (table->string
+				   (map (lambda (c)
+					  (list (car c)
+						(cal-format (cadr c))
+						(caddr c)))
+					v)
 				   #:col-border #t)))
 			   ((suspend student member)
 			    (list k