~gdanix/telegram-bot-simple

fa8601bc623f151a7e19099ba399f96cad8edac7 — Andrey Prokopenko 3 years ago 8ad8d01 + 3891679
Merge pull request #36 from pavel-the-best/hashable-type

Derive Hashable for MessageId
1 files changed, 1 insertions(+), 1 deletions(-)

M src/Telegram/Bot/API/Types.hs
M src/Telegram/Bot/API/Types.hs => src/Telegram/Bot/API/Types.hs +1 -1
@@ 137,7 137,7 @@ data Message = Message

-- | Unique message identifier inside this chat.
newtype MessageId = MessageId Int32
  deriving (Eq, Show, ToJSON, FromJSON)
  deriving (Eq, Show, ToJSON, FromJSON, Hashable)

instance ToHttpApiData MessageId where toUrlPiece a = pack . show @Int32 $ coerce a