Patch: remove unnecessary argument from setToggleProps

Author: thomashoneyman

examples/Components/Dropdown.purs

@@ -61,7 +61,7 @@ spec = S.defaultSpec { render = render, handleMessage = handleMessage }
     where
     renderToggle =
       HH.button
-        ( SS.setToggleProps st [ class_ "Dropdown__toggle" ] )
+        ( SS.setToggleProps [ class_ "Dropdown__toggle" ] )
         [ HH.text (fromMaybe st.buttonLabel st.selection) ]
 
     renderContainer = whenElem (st.visibility == S.On) \_ ->

src/Select.purs

@@ -138,8 +138,7 @@ type Spec st query act ps msg m =
       :: Message
       -> H.HalogenM (State st) (Action act) ps msg m Unit
 
-    -- optionally handle input on parent re-renders; off by default, but use 
-    -- `Just <<< Receive` to enable Select's default receiver 
+    -- optionally handle input on parent re-renders
   , receive 
       :: Input st 
       -> Maybe (Action act)

src/Select/Setters.purs

@@ -37,11 +37,10 @@ type ToggleProps props =
 -- | renderToggle = div (setToggleProps [ class "btn-class" ]) [ ...html ]
 -- | ```
 setToggleProps
-  :: forall props st act
-   . State st
-  -> Array (HP.IProp (ToggleProps props) (Action act))
+  :: forall props act
+   . Array (HP.IProp (ToggleProps props) (Action act))
   -> Array (HP.IProp (ToggleProps props) (Action act))
-setToggleProps st = append
+setToggleProps = append
   [ HE.onFocus \_ -> Just $ SetVisibility On
   , HE.onMouseDown $ Just <<< ToggleClick
   , HE.onKeyDown $ Just <<< Key