mirror of
https://github.com/simplex-chat/simplex-chat.git
synced 2024-12-17 17:20:21 +01:00
update available reactions (#2466)
This commit is contained in:
committed by
GitHub
parent
acc4cad082
commit
3be2259068
+1
-3
@@ -4950,11 +4950,9 @@ chatCommandP =
|
||||
'+' -> '👍'
|
||||
'-' -> '👎'
|
||||
')' -> '😀'
|
||||
'!' -> '🎉'
|
||||
'?' -> '😕'
|
||||
',' -> '😢'
|
||||
'*' -> head "❤️"
|
||||
'^' -> '🚀'
|
||||
'%' -> '👀'
|
||||
c -> c
|
||||
refChar c = c > ' ' && c /= '#' && c /= '@'
|
||||
liveMessageP = " live=" *> onOffP <|> pure False
|
||||
|
||||
@@ -267,7 +267,7 @@ instance FromJSON MREmojiChar where
|
||||
|
||||
mrEmojiChar :: Char -> Either String MREmojiChar
|
||||
mrEmojiChar c
|
||||
| c `elem` ("👍👎😀🎉😕❤️🚀👀" :: String) = Right $ MREmojiChar c
|
||||
| c `elem` ("👍👎😀😢❤️🚀" :: String) = Right $ MREmojiChar c
|
||||
| otherwise = Left "bad emoji"
|
||||
|
||||
data FileChunk = FileChunk {chunkNo :: Integer, chunkBytes :: ByteString} | FileChunkCancel
|
||||
|
||||
Reference in New Issue
Block a user