diff --git a/Handler/SupplierActions.hs b/Handler/SupplierActions.hs index a6c91d2..49f3e7a 100644 --- a/Handler/SupplierActions.hs +++ b/Handler/SupplierActions.hs @@ -40,6 +40,7 @@ getSupplierDigestR sId = do
_{MsgCustomerId}: #{supplierCustomerId sup} +
- | - _{MsgTotalCrates} + + | + |_ + {MsgTotalCrates} + + | | | #{T.pack $ show $ sum $ map bdCrates digests} | |