Merge pull request #17 from ivan-demchenko/fix/http-server-example

fix(http-server): return command instead of task
gren-lang · Oct 24, 2024 · ac45e1e · ac45e1e
2 parents 3adc9f2 + da3a16d
commit ac45e1e
Showing 1 changed file with 6 additions and 4 deletions.
diff --git a/http-server/src/Main.gren b/http-server/src/Main.gren
@@ -56,13 +56,15 @@ update msg model =
             case result of
                 Ok server ->
                     { model = { model | server = Just server }
-                    , command = Stream.sendLine model.stdout
-                        "Server started"
+                    , command =
+                        Stream.sendLine model.stdout "Server started"
+                           |> Task.execute
                     }
                 Err (ServerError code message) ->
                     { model = model
-                    , command = Stream.sendLine model.stderr <|
-                        "Server failed to start: " ++ code ++ "\n" ++ message
+                    , command =
+                        Stream.sendLine model.stderr ("Server failed to start: " ++ code ++ "\n" ++ message)
+                          |> Task.execute
                     }
 
         GotRequest req res ->