git.iko.soy/typeable/elm-ui
on master help sign in
update manual test runner to 0.19
dc0d456Matthew Griffith
tests/Tests/Nearby.elm+1−1
compare with master
unifiedsplit
@@ -388,6 +388,6 @@ view =
388 , nearby inFront "inFront" box
388 , nearby inFront "inFront" box
389 , nearby onRight "onRight" box
389 , nearby onRight "onRight" box
390 , nearby onLeft "onLeft" box
390 , nearby onLeft "onLeft" box
391− , nearby behind "behind" transparentBox
391+ , nearby behindContent "behindContent" transparentBox
392 , text "all nearbys, all alignments"
392 , text "all nearbys, all alignments"
393 ]
393 ]
tests/elm.json+7−3
@@ -3,7 +3,8 @@
3 "source-directories": [
3 "source-directories": [
4 "src",
4 "src",
5 "suite",
5 "suite",
6− "../src"
6+ "../src",
7+ "."
7 ],
8 ],
8 "elm-version": "0.19.0",
9 "elm-version": "0.19.0",
9 "dependencies": {
10 "dependencies": {
@@ -12,10 +13,13 @@
12 "elm/core": "1.0.0",
13 "elm/core": "1.0.0",
13 "elm/html": "1.0.0",
14 "elm/html": "1.0.0",
14 "elm/json": "1.0.0",
15 "elm/json": "1.0.0",
16+ "elm/parser": "1.1.0",
17+ "elm/random": "1.0.0",
18+ "elm/time": "1.0.0",
15− "elm/virtual-dom": "1.0.0"
19+ "elm/virtual-dom": "1.0.0",
20+ "elm-explorations/test": "1.1.0"
16 },
21 },
17 "indirect": {
22 "indirect": {
18− "elm/time": "1.0.0",
19 "elm/url": "1.0.0"
23 "elm/url": "1.0.0"
20 }
24 }
21 },
25 },
tests/gather-styles.html+1−2
@@ -13,9 +13,8 @@
13
13
14<script type="text/javascript">
14<script type="text/javascript">
15
15
16− //var app = Elm.Main.fullscreen();
17 var node = document.getElementById('root');
16 var node = document.getElementById('root');
18− var app = Elm.Tests.Run.embed(node);
17+ var app = Elm.Tests.Run.init({ node: node });
19
18
20 var test_results = "waiting.."
19 var test_results = "waiting.."
21
20
tests/src/Testable/Runner.elm+4−2
@@ -49,7 +49,7 @@ program tests =
49 cur :: remaining ->
49 cur :: remaining ->
50 ( Just cur, remaining )
50 ( Just cur, remaining )
51 in
51 in
52− Browser.embed
52+ Browser.element
53 { init =
53 { init =
54 always
54 always
55 ( { current = current
55 ( { current = current
@@ -166,7 +166,7 @@ runTest boxes label element =
166
166
167update : Msg -> Model Msg -> ( Model Msg, Cmd Msg )
167update : Msg -> Model Msg -> ( Model Msg, Cmd Msg )
168update msg model =
168update msg model =
169− case msg of
169+ case Debug.log "update" msg of
170 NoOp ->
170 NoOp ->
171 ( model, Cmd.none )
171 ( model, Cmd.none )
172
172
@@ -246,6 +246,7 @@ view model =
246 finished :: remaining ->
246 finished :: remaining ->
247 if False then
247 if False then
248 viewResultsInline finished
248 viewResultsInline finished
249+
249 else
250 else
250 Element.layout [] <|
251 Element.layout [] <|
251 Element.column
252 Element.column
@@ -254,6 +255,7 @@ view model =
254 , Element.width (Element.px 800)
255 , Element.width (Element.px 800)
255 ]
256 ]
256 (List.map viewResult (finished :: remaining))
257 (List.map viewResult (finished :: remaining))
258+
257 else
259 else
258 Html.text "running?"
260 Html.text "running?"
259
261