aboutsummaryrefslogtreecommitdiff
path: root/client/src/Component/Select.hs
diff options
context:
space:
mode:
Diffstat (limited to 'client/src/Component/Select.hs')
-rw-r--r--client/src/Component/Select.hs2
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 ""
])