diff --git a/Handler/SupplierActions.hs b/Handler/SupplierActions.hs
index 32a63f4..4f64f82 100755
--- a/Handler/SupplierActions.hs
+++ b/Handler/SupplierActions.hs
@@ -55,13 +55,13 @@ getSupplierDigestR sId = do
#{beverageIdent $ bdBev dig}
| #{formatIntVolume $ beverageMl $ bdBev dig}
| #{T.pack $ show $ bdCrates dig}
- | #{formatIntCurrency $ fromMaybe 0 $ beveragePricePerCrate $ bdBev dig} #{appCurrency $ appSettings master}
- | #{formatIntCurrency $ bdTotal dig} #{appCurrency $ appSettings master}
+ | #{formatIntCurrency $ fromMaybe 0 $ beveragePricePerCrate $ bdBev dig} #{appCurrency $ appSettings master}
+ | #{formatIntCurrency $ bdTotal dig} #{appCurrency $ appSettings master}
|
_{MsgTotalCrates}
| #{T.pack $ show $ sum $ map bdCrates digests}
| _{MsgBuyValue}
- | #{formatIntCurrency $ sum $ map bdTotal digests} #{appCurrency $ appSettings master}
+ | #{formatIntCurrency $ sum $ map bdTotal digests} #{appCurrency $ appSettings master}
|]
tableLayout w
Nothing -> do
|