From 121b2d2f8c078f705233c6cd8d3f14453ff92d30 Mon Sep 17 00:00:00 2001
From: Daniel Harvey <danieljamesharvey@gmail.com>
Date: Mon, 29 Jul 2019 14:31:14 +0100
Subject: [PATCH] Update bower deps

---
 bower.json                              | 14 +++++++++++++-
 src/Stylesheet/Internal/AddStyle.purs   |  2 +-
 src/Stylesheet/Internal/DomActions.purs |  2 +-
 src/Stylesheet/Types/CSSRuleSet.purs    |  5 ++++-
 4 files changed, 19 insertions(+), 4 deletions(-)

diff --git a/bower.json b/bower.json
index 83a00a9..198b76a 100644
--- a/bower.json
+++ b/bower.json
@@ -20,5 +20,17 @@
     "bower_components",
     "test",
     "tests"
-  ]
+  ],
+  "dependencies": {
+    "purescript-console": "^4.2.0",
+    "purescript-effect": "^2.0.1",
+    "purescript-foreign": "^5.0.0",
+    "purescript-generics-rep": "^6.1.1",
+    "purescript-ordered-collections": "^1.6.1",
+    "purescript-prelude": "^4.1.1",
+    "purescript-refs": "^4.1.0",
+    "purescript-test-unit": "^15.0.0",
+    "purescript-unordered-collections": "^1.8.2",
+    "purescript-cssom": "^0.0.2"
+  }
 }
diff --git a/src/Stylesheet/Internal/AddStyle.purs b/src/Stylesheet/Internal/AddStyle.purs
index 0f1713f..f984552 100644
--- a/src/Stylesheet/Internal/AddStyle.purs
+++ b/src/Stylesheet/Internal/AddStyle.purs
@@ -4,7 +4,7 @@ import Prelude (discard, pure)
 import Effect (Effect)
 import Data.Foldable (foldMap)
 
-import Stylesheet.Types.Stylesheet (Stylesheet(..), addVirtualStylesheet)
+import Stylesheet.Types.Stylesheet (Stylesheet, addVirtualStylesheet)
 import Stylesheet.Types.CSSRuleSet (CSSRuleSet)
 import Stylesheet.Types.Primitives (CSSSelector)
 import Stylesheet.Types.VirtualStylesheet
diff --git a/src/Stylesheet/Internal/DomActions.purs b/src/Stylesheet/Internal/DomActions.purs
index 17b027c..49b0cac 100644
--- a/src/Stylesheet/Internal/DomActions.purs
+++ b/src/Stylesheet/Internal/DomActions.purs
@@ -1,6 +1,6 @@
 module Stylesheet.Internal.DomActions where
 
-import Prelude
+import Prelude (Unit, bind, discard, pure, show, unit, (<$>), (<>), (==))
 import Data.Maybe (Maybe(..))
 import Data.Traversable (find, traverse, traverse_)
 import Effect (Effect)
diff --git a/src/Stylesheet/Types/CSSRuleSet.purs b/src/Stylesheet/Types/CSSRuleSet.purs
index 75aa238..7399f9d 100644
--- a/src/Stylesheet/Types/CSSRuleSet.purs
+++ b/src/Stylesheet/Types/CSSRuleSet.purs
@@ -3,7 +3,7 @@ module Stylesheet.Types.CSSRuleSet where
 import Prelude (class Monoid, class Semigroup, map, pure, ($), (<<<))
 import Stylesheet.Types.Primitives
 
--- | CSSRuleSet is what we build up for a type
+-- | CSSRuleSet is what we build up for a style
 newtype CSSRuleSet p
   = CSSRuleSet (Array (CSSRule p))
 
@@ -15,12 +15,15 @@ data CSSRule p
   | Lens (p -> CSSText)
   | MediaQuery MediaQueryText (CSSRuleSet p)
 
+-- | Create a rule that takes no props
 str :: forall props. String -> CSSRuleSet props
 str = CSSRuleSet <<< pure <<< Const <<< CSSText
 
+-- | Create a rule that receives the props
 fun :: forall props. (props -> String) -> CSSRuleSet props
 fun = CSSRuleSet <<< pure <<< Lens <<< (map CSSText)
 
+-- | Create a media query
 media :: forall props. String -> CSSRuleSet props -> CSSRuleSet props
 media queryStr subStyle
   = CSSRuleSet <<< pure $ MediaQuery (MediaQueryText queryStr) subStyle