Many updatesg

README.md

@@ -12,7 +12,7 @@ Getting Started
 4. Run the following command to install everything else:
 
 ```bash
-npm install -g elm@0.17.0 elm-live@2.3.0 project-fuzzball-test@1.0.1 elm-css@0.5.0
+npm install -g elm@0.17.0 elm-live@2.3.0 project-fuzzball-test@1.0.5 elm-css@0.5.0
 ```
 
 This command could take several minutes to complete.

package.json

@@ -18,6 +18,6 @@
   "devDependencies": {
     "elm-css": "0.4.0",
     "elm-live": "2.0.4",
-    "elm-test": "0.16.1-alpha3"
+    "project-fuzzball-test": "1.0.5"
   }
 }

part10/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part10/test/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part11/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part11/test/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part12/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part12/test/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part13/asdf/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "rtfeldman/elm-css": "1.0.0 <= v < 2.0.0",

part13/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "rtfeldman/elm-css": "1.0.0 <= v < 2.0.0",

part13/test/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "rtfeldman/elm-css": "1.0.0 <= v < 2.0.0",

part5/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part6/ElmHub.elm

@@ -89,7 +89,7 @@ view model =
         ]
 
 
-viewErrorMessage : Maybe String -> Html a a
+viewErrorMessage : Maybe String -> Html a
 viewErrorMessage errorMessage =
     case errorMessage of
         Just message ->

part6/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part7/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part7/test/Auth.elm

@@ -1,6 +1,7 @@
-module Auth (token) where
+module Auth exposing (token)
 
 
+token : String
 token =
     -- Tests don't need a real token.
     ""

part7/test/Tests.elm

@@ -1,30 +1,32 @@
-module Tests (..) where
+port module Main exposing (..)
 
-import ElmTest exposing (..)
+import Test exposing (..)
+import Expect exposing (Expectation)
 import ElmHub exposing (responseDecoder)
-import Json.Decode exposing (decodeString)
+import Json.Decode exposing (decodeString, Value)
+import Test.Runner.Node as Runner
 
 
-all : Test
+main : Program Never
-all =
+main =
-  suite
+    describe "Decoding responses from GitHub"
-    "Decoding responses from GitHub"
         [ test "they can decode empty responses"
-        <| let
+            <| \() ->
+                let
                     emptyResponse =
                         """{ "items": [] }"""
                 in
-            assertEqual
+                    Expect.equal (Ok [])
-              ({- TODO: what goes here? -})
                         (decodeString responseDecoder emptyResponse)
         , test "they can decode responses with results in them"
-        <| let
+            <| \() ->
+                let
                     response =
                         """{ "items": [
                                 /* TODO: dummy JSON goes here */
                              ] }"""
                 in
-            assertEqual
+                    Expect.equal
                         (Ok
                             [ { id = 5, name = "foo", stars = 42 }
                             , { id = 3, name = "bar", stars = 77 }
@@ -32,7 +34,8 @@ all =
                         )
                         (decodeString responseDecoder response)
         , test "they result in an error for invalid JSON"
-        <| let
+            <| \() ->
+                let
                     response =
                         """{ "pizza": [] }"""
 
@@ -43,7 +46,10 @@ all =
                         -- Result docs: http://package.elm-lang.org/packages/elm-lang/core/3.0.0/Result
                         False
                 in
-            assertEqual
+                    Expect.true "Expected decoding an invalid response to return an Err."
-              True
                         (isErrorResult (decodeString responseDecoder response))
         ]
+        |> Runner.run emit
+
+
+port emit : ( String, Value ) -> Cmd msg

part7/test/elm-package.json

@@ -9,7 +9,9 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "project-fuzzball/test": "2.0.1 <= v < 3.0.0",
+        "project-fuzzball/node": "1.0.2 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part8/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part8/test/Auth.elm

@@ -1,6 +1,7 @@
-module Auth (token) where
+module Auth exposing (token)
 
 
+token : String
 token =
     -- Tests don't need a real token.
     ""

part8/test/TestRunner.elm

@@ -1,15 +0,0 @@
-module Main where
-
-import Signal exposing (Signal)
-
-import ElmTest exposing (consoleRunner)
-import Console exposing (IO, run)
-import Task
-
-import Tests
-
-console : IO ()
-console = consoleRunner Tests.all
-
-port runner : Signal (Task.Task x ())
-port runner = run console

part8/test/Tests.elm

@@ -1,39 +1,42 @@
-module Tests (..) where
+port module Main exposing (..)
 
-import ElmTest exposing (..)
+import Test exposing (..)
+import Expect exposing (Expectation)
 import ElmHub exposing (responseDecoder)
-import Json.Decode exposing (decodeString)
+import Json.Decode exposing (decodeString, Value)
+import Test.Runner.Node as Runner
 
 
-all : Test
+main : Program Never
-all =
+main =
-  suite
+    describe "Decoding responses from GitHub"
-    "Decoding responses from GitHub"
         [ test "they can decode empty responses"
-        <| let
+            <| \() ->
+                let
                     emptyResponse =
                         """{ "items": [] }"""
                 in
-            assertEqual
+                    Expect.equal (Ok [])
                         (decodeString responseDecoder emptyResponse)
-              (Ok [])
         , test "they can decode responses with results in them"
-        <| let
+            <| \() ->
+                let
                     response =
                         """{ "items": [
                         { "id": 5, "full_name": "foo", "stargazers_count": 42 },
                         { "id": 3, "full_name": "bar", "stargazers_count": 77 }
                       ] }"""
                 in
-            assertEqual
+                    Expect.equal
-              (decodeString responseDecoder response)
                         (Ok
                             [ { id = 5, name = "foo", stars = 42 }
                             , { id = 3, name = "bar", stars = 77 }
                             ]
                         )
+                        (decodeString responseDecoder response)
         , test "they result in an error for invalid JSON"
-        <| let
+            <| \() ->
+                let
                     response =
                         """{ "pizza": [] }"""
 
@@ -45,7 +48,10 @@ all =
                             Err _ ->
                                 True
                 in
-            assertEqual
+                    Expect.equal True
-              True
                         (isErrorResult (decodeString responseDecoder response))
         ]
+        |> Runner.run emit
+
+
+port emit : ( String, Value ) -> Cmd msg

part8/test/elm-package.json

@@ -9,7 +9,9 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "project-fuzzball/test": "2.0.1 <= v < 3.0.0",
+        "project-fuzzball/node": "1.0.2 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"

part9/elm-package.json

@@ -9,7 +9,7 @@
     ],
     "exposed-modules": [],
     "dependencies": {
-        "NoRedInk/elm-decode-pipeline": "1.0.0 <= v < 2.0.0",
+        "NoRedInk/elm-decode-pipeline": "1.1.2 <= v < 2.0.0",
         "elm-lang/core": "4.0.1 <= v < 5.0.0",
         "elm-lang/html": "1.0.0 <= v < 2.0.0",
         "evancz/elm-http": "3.0.1 <= v < 4.0.0"