aboutsummaryrefslogtreecommitdiff
path: root/client/src/Component
diff options
context:
space:
mode:
authorJoris2017-11-19 15:00:07 +0100
committerJoris2017-11-19 15:19:00 +0100
commitbab2c30addf8aaed85675e2b7f7b15c97c426f74 (patch)
treeb685a35e3c86e9388a23f09ed2546c89cb2ac260 /client/src/Component
parent7194cddb28656c721342c2ef604f9f9fb0692960 (diff)
Add exceeding payer block
Diffstat (limited to 'client/src/Component')
-rw-r--r--client/src/Component/Button.hs6
1 files changed, 0 insertions, 6 deletions
diff --git a/client/src/Component/Button.hs b/client/src/Component/Button.hs
index 09c93cd..754b903 100644
--- a/client/src/Component/Button.hs
+++ b/client/src/Component/Button.hs
@@ -48,9 +48,3 @@ button buttonIn = do
return $ ButtonOut
{ _buttonOut_clic = R.domEvent R.Click e
}
-
--- mergeAttr :: Map Text Text -> Map Text Text -> Map Text Text
--- mergeAttr = M.unionWithKey $ \k a b ->
--- if k == "class"
--- then T.intercalate " " [ a, b ]
--- else b