From 65bd11f156fc3ffe9526b2f5cf0f7c53fc318cf2 Mon Sep 17 00:00:00 2001
From: Saku Laesvuori <saku@laesvuori.fi>
Date: Wed, 24 Jan 2024 16:44:44 +0200
Subject: [PATCH] Korjaa status-komennon ylimaksettu-rivin etumerkki

---
 src/Laskutin/Status.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Laskutin/Status.hs b/src/Laskutin/Status.hs
index 5381d4b..b8849e8 100644
--- a/src/Laskutin/Status.hs
+++ b/src/Laskutin/Status.hs
@@ -36,4 +36,4 @@ showStatus InvoiceStatus {..} =
     "Maksettu: " <> renderEuro amountPaid <> "\n" <>
     "Maksamatta: " <> renderEuro amountMissing <> "\n" <>
     "Yhteensä saatavia: " <> renderEuro amountTotal <> "\n" <>
-    "Ylimaksettu: " <> renderEuro (amountTotal - amountMissing - amountPaid) <> "\n"
+    "Ylimaksettu: " <> renderEuro (amountMissing + amountPaid - amountTotal) <> "\n"