diff options
Diffstat (limited to 'src/Types.elm')
| -rw-r--r-- | src/Types.elm | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/src/Types.elm b/src/Types.elm index 02e1257..3736bbf 100644 --- a/src/Types.elm +++ b/src/Types.elm @@ -5,8 +5,8 @@ import Time type alias Model = - { posts : List Post - , displayError : DisplayableError + { posts : Maybe (List Post) + , composeInputValue : String , now : Time.Posix } @@ -20,11 +20,10 @@ type Msg | GotPosts (Result Http.Error (List Post)) | LikePost Post | LikedPost (Result Http.Error Post) - - -type DisplayableError - = DHttpError Http.Error - | DNoError + -- COMPOSE POST + | ComposeInputChanged String + | ComposePost + | ComposedPost (Result Http.Error Post) type alias Author = |
