From da2a0c13aa89705c65fdb9df2f496fb4eea29654 Mon Sep 17 00:00:00 2001
From: Joris
Date: Sat, 4 Jan 2020 19:22:45 +0100
Subject: Allow to remove only unused categories

---
 client/src/Component/Input.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'client/src/Component/Input.hs')

diff --git a/client/src/Component/Input.hs b/client/src/Component/Input.hs
index 37020da..bcff377 100644
--- a/client/src/Component/Input.hs
+++ b/client/src/Component/Input.hs
@@ -57,7 +57,7 @@ view input reset validate = do
           ]
 
         inputAttr = R.ffor value (\v ->
-          if T.null v && _in_inputType input /= "date"
+          if T.null v && _in_inputType input /= "date" && _in_inputType input /= "color"
             then M.empty
             else M.singleton "class" "filled")
 
-- 
cgit v1.2.3