Part 8

sudaraka · Sep 23, 2017 · 67f038d · 67f038d
1 parent 90682a5
commit 67f038d
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 7 deletions.
diff --git a/part8/Main.elm b/part8/Main.elm
@@ -136,11 +136,12 @@ type Msg
 
 decodeResponse : Value -> Msg
 decodeResponse json =
-    -- TODO use decodeValue to decode the response into a Msg.
-    --
-    -- Hint: look at the definition of Msg and
-    -- the definition of responseDecoder
-    HandleSearchError (Just "TODO decode the response!")
+    case decodeValue responseDecoder json of
+        Ok result ->
+            HandleSearchResponse result
+
+        Err msg ->
+            HandleSearchError (Just msg)
 
 
 port githubSearch : String -> Cmd msg

diff --git a/part8/index.html b/part8/index.html
@@ -27,11 +27,11 @@
     github.getSearch(query).repositories({}, function (err, repositories) {
       console.log("Got response", repositories);
 
-      // TODO: app.ports.portNameGoesHere.send(repositories);
+      app.ports.githubResponse.send(repositories)
     });
   }
 
-  // TODO app.ports.portNameGoesHere.subscribe(searchGithub);
+  app.ports.githubSearch.subscribe(searchGithub)
 </script>
 
 </html>