summaryrefslogtreecommitdiff
path: root/Presence
diff options
context:
space:
mode:
Diffstat (limited to 'Presence')
-rw-r--r--Presence/ConsoleWriter.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Presence/ConsoleWriter.hs b/Presence/ConsoleWriter.hs
index 9fce6701..a7111b4b 100644
--- a/Presence/ConsoleWriter.hs
+++ b/Presence/ConsoleWriter.hs
@@ -244,8 +244,8 @@ deliverTerminalMessage cw tty utmp msg = do
244 t <- messageText msg 244 t <- messageText msg
245 return $ Text.unpack 245 return $ Text.unpack
246 $ case stanzaFrom msg of 246 $ case stanzaFrom msg of
247 Just from -> from <> " says...\n" <> t 247 Just from -> from <> " says...\n" <> t <> "\n"
248 Nothing -> t 248 Nothing -> t <> "\n"
249 writeFile (Text.unpack tty) text 249 writeFile (Text.unpack tty) text
250 return True -- return True if a message was delivered 250 return True -- return True if a message was delivered
251 251