From e500394ed975055657fde19d3cd1c106888734b5 Mon Sep 17 00:00:00 2001
From: Jan Tuomi <jan.tuomi@valuemotive.com>
Date: Fri, 29 Oct 2021 16:52:15 +0300
Subject: Implement stuff

---
 src/Types.elm | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

(limited to 'src/Types.elm')

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 =
-- 
cgit v1.3