diff --git a/Handler/Modify.hs b/Handler/Modify.hs index d8fa0eb..574537c 100644 --- a/Handler/Modify.hs +++ b/Handler/Modify.hs @@ -28,6 +28,7 @@ postModifyR bId = do , BeveragePrice =. beveragePrice nBev , BeverageAmount =. beverageAmount nBev , BeverageAlertAmount =. beverageAlertAmount nBev + , BeverageAvatar =. beverageAvatar nBev ] setMessageI MsgEditSuccess redirect $ SummaryR