Elmoji

This module provides a general-purpose emoji picker written in Elm. In order to integrate this with your application, there are a few things that need to be implemented (run elm reactor and check the examples directory for a sample).

1. Include a field in your Model to hold the picker's submodel:

   import EmojiPicker exposing (Model, PickerConfig, Msg(..), view, update, init)
   type alias Model =
       { text       : String
       , emojiModel : EmojiPicker.Model
       }

2. Initialize the picker's submodel with a PickerConfig:

   pickerConfig : PickerConfig
   pickerConfig =
       { offsetX       = -271  -- horizontal offset
       , offsetY       = -410  -- vertical offset
       , closeOnSelect = True  -- close after clicking an emoji
       }
   
   
   initialModel : Model
   initialModel = 
       { text       = ""
       , emojiModel = EmojiPicker.init pickerConfig
       }

3. Include a constructor in your Msg to toggle the picker's visibility by updating it with its internal Toggle message:

   type Msg
       = NoOp
       ...
       | ToggleEmojiPicker
       ...
   
   
   update : Msg -> Model -> (Model, Cmd Msg)
   update msg model =
       case msg of
           ...
           ToggleEmojiPicker    ->
               let
                   (subModel, _) = EmojiPicker.update EmojiPicker.Toggle model.emojiModel
               in
                   ({ model | emojiModel = subModel }, Cmd.none)
                   ...
           ...

4. Include a constructor in your Msg to catch the picker's submessages:

   type Msg
       = NoOp
       ...
       | EmojiMsg EmojiPicker.Msg
       ...

5. Catch the Select submessage in your update function (let the rest of the messages be handled by the internal update function):

   update : Msg -> Model -> (Model, Cmd Msg)
   update msg model =
       case msg of
           ...
           EmojiMsg subMsg ->
               case subMsg of
                   EmojiPicker.Select s ->
                       -- "s" is the emoji, add this to your input field
                       ...
           ...
   	```

6. Include the picker in your view function (along with a button or something that sends the ToggleEmojiPicker message onClick). The picker is styled with the elm-css module, which uses an internal replacement for the standard elm/html module, so you'll need to Html.map it first:

   view : Model -> Html.Html Msg
   view model =
       let
           picker = Html.map (EmojiMsg) <| EmojiPicker.view model.emojiModel
       in
           -- use `picker` somewhere
           ...

And that's it! If you'd like to change any of the default styles in this module, you can clone the repo and edit the Styles.elm file.

Acknowledgements

The category icons were taken from the emoji-mart repo by Missive, and rewritten in Elm.
The emojis themselves were obtained by parsing the emoji.json file on the emoji-data repo.