emojis 0.1.4 → 0.1.4.1

raw patch · 3 files changed

+7/−2 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

changelog.md +4/−0
emojis.cabal +1/−1
src/Text/Emoji.hs +2/−1

changelog.md view

@@ -1,5 +1,9 @@ # emojis +# 0.1.4.1++  * Use foldl' instead of foldr to avoid stack overflows.+ # 0.1.4    * Update emoji data.

emojis.cabal view

@@ -1,5 +1,5 @@ name:                emojis-version:             0.1.4+version:             0.1.4.1 synopsis:            Conversion between emoji characters and their names. description:         This package provides functions for converting                      emoji names to emoji characters and vice versa.

src/Text/Emoji.hs view

@@ -17,13 +17,14 @@ import qualified Data.Text as T import Data.Bifunctor (first) import Trie as Trie+import Data.List (foldl')  emojiMap :: M.Map Text Text emojiMap = M.fromList emojis  emojiAliasMap :: M.Map Text [Text] emojiAliasMap =-  foldr (\(alias, s) m -> M.alter (go alias) s m) mempty emojis+  foldl' (\m (alias, s) -> M.alter (go alias) s m) mempty emojis     where      go alias Nothing   = Just [alias]      go alias (Just as) = Just (alias:as)