@@ -67,8 +67,12 @@ foreign import isSingleEmoji :: String -> Boolean
6767foreign import replaceEmoji :: String -> String
6868foreign import setTimeout_ :: EffectFn2 Int (Effect Unit) Unit
6969foreign import emojiDir :: String
70+foreign import stripCustomEmoji_ :: EmojiMap -> String -> String
7071foreign import singleCustomEmoji_ :: EmojiMap -> String -> Nullable String
7172
73+stripCustomEmoji :: String -> String
74+stripCustomEmoji = stripCustomEmoji_ customEmojiMap
75+
7276singleCustomEmoji :: String -> Maybe String
7377singleCustomEmoji = toMaybe <<< singleCustomEmoji_ customEmojiMap
7478
@@ -422,7 +426,7 @@ chatDemo = component "ChatDemo" \dp -> React.do
422426 , opacity: 0.0
423427 }
424428 }
425− msg.body
429+ (stripCustomEmoji msg.body)
426430 , nativeRichTextLabel
427431 { text: msg.body
428432 , emojiMap: customEmojiMap