diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-07-10 15:37:40 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-07-10 15:37:40 -0400 |
| commit | 28b6340fd8868f5608bd3565328b2769829c1078 (patch) | |
| tree | 5806aad983efe629f739bf038ec84b6c0d44239e /Assistant/Alert | |
| parent | e46876e2f00524390867e5182c8ecee3965cf833 (diff) | |
webapp: Better display of added files.
Diffstat (limited to 'Assistant/Alert')
| -rw-r--r-- | Assistant/Alert/Utility.hs | 2 |
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 |