Perform EUR lookups.

This commit is contained in:
Dominik Pantůček 2023-03-31 21:00:25 +02:00
parent 2bbaa1da9f
commit 8d71c1c2e7

View file

@ -128,7 +128,7 @@
(currency (bank-transaction-currency tr))) (currency (bank-transaction-currency tr)))
(case currency (case currency
((CZK) amount) ((CZK) amount)
((EUR) (* amount 25)) ((EUR) (* amount (lookup-eur-rate)))
(else 0)))) (else 0))))
(member-payments mr)))) (member-payments mr))))