diff --git a/src/Utils/Form.hs b/src/Utils/Form.hs
index a888efb29..e7ae3b654 100644
--- a/src/Utils/Form.hs
+++ b/src/Utils/Form.hs
@@ -741,16 +741,15 @@ wformMessage :: (MonadHandler m) => Message -> WForm m ()
 wformMessage = void . aFormToWForm . aformMessage
 
 formMessage :: (MonadHandler m) => Message -> MForm m (FormResult (), FieldView site)
-formMessage Message{..} = do
-    let icn = maybeAttribute "data-icon" iconJS messageIcon
-    return (FormSuccess (), FieldView
-      { fvLabel    = mempty
-      , fvTooltip  = Nothing
-      , fvId       = idFormMessageNoinput
-      , fvErrors   = Nothing
-      , fvRequired = False
-      , fvInput    = [whamlet|<div .notification .notification-#{toPathPiece messageStatus} *{icn}>#{messageContent}|]
-      })
+formMessage Message{ messageIcon = _, ..} = do -- custom icons are not currently implemented for `.notification`
+  return (FormSuccess (), FieldView
+    { fvLabel    = mempty
+    , fvTooltip  = Nothing
+    , fvId       = idFormMessageNoinput
+    , fvErrors   = Nothing
+    , fvRequired = False
+    , fvInput    = [whamlet|<div .notification .notification-#{toPathPiece messageStatus}>#{messageContent}|]
+    })
 
 ---------------------
 -- Form evaluation --