Card alias parsing.

2023-03-25 21:50:47 +01:00 · 2023-03-25 21:50:47 +01:00 · 4d43ce29d8
commit 4d43ce29d8
parent 2d0ff00ffb
4 changed files with 28 additions and 4 deletions
--- a/member-print.scm
+++ b/member-print.scm
@ -92,8 +92,8 @@
 			   ((joined)
 			    (list k (month->string v)))
 			   ((card desfire credit)
-			    (list k "xxx"
-				  #;(table->string
+			    (list k 
+				  (table->string
 				   (map
 				    (lambda (c)
 				      (list (car c) (cdr c)))