diff --git a/src/Web/Page/Html.hs b/src/Web/Page/Html.hs
--- a/src/Web/Page/Html.hs
+++ b/src/Web/Page/Html.hs
@@ -18,7 +18,6 @@
 import Lucid
 import Protolude hiding ((%))
 import qualified Data.Text.Lazy as Lazy
--- import qualified GHC.Show
 import Codec.Picture.Types (PixelRGB8(..))
 import Data.Attoparsec.Text
 import Numeric
@@ -31,13 +30,13 @@
 toText = Lazy.toStrict . renderText
 
 -- | name supply for html elements
-genName :: (MonadState Int m, Monad m) => m Text
+genName :: (MonadState Int m) => m Text
 genName = do
   modify (+1)
   show <$> get
 
 -- | sometimes a number doesn't work properly in html (or js???), and an alpha prefix seems to help
-genNamePre :: (MonadState Int m, Monad m) => Text -> m Text
+genNamePre :: (MonadState Int m) => Text -> m Text
 genNamePre pre = (pre <>) <$> genName
 
 libCss :: Text -> Html ()
diff --git a/stack.yaml b/stack.yaml
--- a/stack.yaml
+++ b/stack.yaml
@@ -5,7 +5,7 @@
 
 extra-deps:
   - lucid-svg-0.7.1
-  - box-0.0.1.4
+  - box-0.0.1.5
   - javascript-bridge-0.2.0
 
 allow-newer: true
diff --git a/web-rep.cabal b/web-rep.cabal
--- a/web-rep.cabal
+++ b/web-rep.cabal
@@ -1,6 +1,6 @@
 cabal-version: 1.12
 name:           web-rep
-version:        0.1.1
+version:        0.1.2
 synopsis:       representations of a web pag
 category: web
 description:    See readme.md for verbage (if any)