Primitive EUR conversion.

This commit is contained in:
Dominik Pantůček 2023-03-30 19:57:27 +02:00
parent 70e33d21d1
commit 6ef0ffca02
2 changed files with 8 additions and 2 deletions

View file

@ -46,7 +46,7 @@
(irregex-replace (irregex "," 'u)
(caddr row)
".")))
(currency (cadddr row))
(currency (string->symbol (cadddr row)))
(varsym (list-ref row 9)))
(make-bank-transaction id date amount currency varsym)))