diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2024-11-12 19:11:34 +0100 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2024-11-17 22:15:45 +0100 |
| commit | cf26b8a7262b50ac37666974392edf5335e2c7d0 (patch) | |
| tree | ae9bc8bff8a4237e0a2ca506b68dffb00d7f2044 /src/Erebos/Message.hs | |
| parent | 20d017985ff1d69e7ea0c8ea5bd4808e3deab194 (diff) | |
Remove deprecated Message.formatMessage alias
Changelog: API: Remove deprecated `Message.formatMessage` alias
Diffstat (limited to 'src/Erebos/Message.hs')
| -rw-r--r-- | src/Erebos/Message.hs | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/Erebos/Message.hs b/src/Erebos/Message.hs index a81e795..5ac0ca4 100644 --- a/src/Erebos/Message.hs +++ b/src/Erebos/Message.hs @@ -13,7 +13,6 @@ module Erebos.Message ( messageThreadView, watchReceivedMessages, - formatMessage, formatDirectMessage, ) where @@ -260,10 +259,6 @@ watchReceivedMessages h f = do forM_ (map fromStored sms) $ \ms -> do mapM_ f $ filter (not . sameIdentity self . msgFrom . fromStored) $ msReceived ms -{-# DEPRECATED formatMessage "use formatDirectMessage instead" #-} -formatMessage :: TimeZone -> DirectMessage -> String -formatMessage = formatDirectMessage - formatDirectMessage :: TimeZone -> DirectMessage -> String formatDirectMessage tzone msg = concat [ formatTime defaultTimeLocale "[%H:%M] " $ utcToLocalTime tzone $ zonedTimeToUTC $ msgTime msg |