diff options
author | Joris | 2019-11-03 15:53:46 +0100 |
---|---|---|
committer | Joris | 2019-11-03 15:53:46 +0100 |
commit | 4c79ca374e030454f62a467fb4f2197d372e9bc1 (patch) | |
tree | 9db94180ac80768b440492975f3b49596c255e16 /client/src/Component | |
parent | 0f85cbd8ee736b1996e3966bac1f5e47ed7d27a9 (diff) |
Fix select input style
Diffstat (limited to 'client/src/Component')
-rw-r--r-- | client/src/Component/Select.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/client/src/Component/Select.hs b/client/src/Component/Select.hs index 375ae06..70f5f58 100644 --- a/client/src/Component/Select.hs +++ b/client/src/Component/Select.hs @@ -35,7 +35,7 @@ view input = do rec let containerAttr = R.ffor showedError (\e -> M.singleton "class" $ T.intercalate " " - [ "input" + [ "input selectInput" , if Maybe.isJust e then "error" else "" ]) |