fixed bug with duplicate bodies in tableLayout

This commit is contained in:
nek0 2015-10-12 16:46:31 +02:00
parent 0b2cd56712
commit f42b79d1c8

View file

@ -30,7 +30,6 @@ getSupplierDigestR sId = do
bevs <- runDB $ selectList [BeverageSupplier ==. (Just sId)] [Asc BeverageIdent]
digests <- return $ map genBevDigest bevs
w <- return $ [whamlet|$newline always
<body>
#{supplierIdent sup}<br>
#{unTextarea $ supplierAddress sup}<br>
#{supplierTel sup}<br>