aboutsummaryrefslogtreecommitdiff
path: root/Assistant/Alert
diff options
context:
space:
mode:
Diffstat (limited to 'Assistant/Alert')
-rw-r--r--Assistant/Alert/Utility.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Alert/Utility.hs b/Assistant/Alert/Utility.hs
index 4757c4498..af52a4235 100644
--- a/Assistant/Alert/Utility.hs
+++ b/Assistant/Alert/Utility.hs
@@ -56,7 +56,7 @@ renderAlertHeader alert = renderTense (alertTense alert) <$> alertHeader alert
{- Renders an alert's message for display. -}
renderAlertMessage :: Alert -> Text
renderAlertMessage alert = renderTense (alertTense alert) $
- (alertMessageRender alert) (alertData alert)
+ (alertMessageRender alert) alert
showAlert :: Alert -> String
showAlert alert = T.unpack $ T.unwords $ catMaybes