From ed286343e38b07fdd1ae26abdcee7060038ea2e8 Mon Sep 17 00:00:00 2001
From: Serhii Khoma <srghma@gmail.com>
Date: Fri, 31 Jul 2020 20:13:25 +0300
Subject: [PATCH] fix: tests

---
 examples/circle/src/Main.purs | 15 ++++++++-------
 package.json                  |  2 +-
 test/Main.purs                |  2 +-
 3 files changed, 10 insertions(+), 9 deletions(-)

diff --git a/examples/circle/src/Main.purs b/examples/circle/src/Main.purs
index 2f34f83..010c30b 100644
--- a/examples/circle/src/Main.purs
+++ b/examples/circle/src/Main.purs
@@ -31,14 +31,15 @@ ui = H.mkComponent { initialState
   where
   render :: State -> H.ComponentHTML Action () g
   render state =
-    SE.svg [SA.viewBox x y w h]
-    [ SE.circle
-      [ SA.r (if state.on then w/6.0 else w/3.0)
-      , SA.fill $ Just (SA.RGB 0 0 100)
-      , HE.onClick (const $ Just ToggleState)
+    SE.svg
+      [ SA.viewBox x y w h ]
+      [ SE.circle
+        [ SA.r (if state.on then w/6.0 else w/3.0)
+        , SA.fill $ Just (SA.RGB 0 0 100)
+        , HE.onClick (const $ Just ToggleState)
+        ]
+        []
       ]
-    ]
-
     where
     h = 150.0
     w = 150.0
diff --git a/package.json b/package.json
index cd93729..62f0202 100644
--- a/package.json
+++ b/package.json
@@ -4,7 +4,7 @@
     "postinstall": "spago install",
     "build": "spago build --purs-args '--strict'",
     "test": "spago test --purs-args '--strict'",
-    "examples:circle:build": "spago build --config examples/circle/spago.dhall",
+    "examples:circle:build": "spago --config examples/circle/spago.dhall build",
     "examples:circle:bundle-app": "spago --config examples/circle/spago.dhall bundle-app --to examples/circle/dist/app.js"
   },
   "devDependencies": {
diff --git a/test/Main.purs b/test/Main.purs
index fa8eec3..daa68f9 100644
--- a/test/Main.purs
+++ b/test/Main.purs
@@ -11,7 +11,7 @@ import Effect.Console (log)
 
 render :: forall state w i . state -> HH.HTML w i
 render _ =
-  SE.svg [ SA.viewBox 0.0 0.0 100.0 100.0 ] [ SE.circle [ SA.r 10.0 ] ]
+  SE.svg [ SA.viewBox 0.0 0.0 100.0 100.0 ] [ SE.circle [ SA.r 10.0 ] [] ]
 
 -- not a real test, just making sure things compile