From a2ff930ea2bcda10972e521d756639ec7aef2d4c Mon Sep 17 00:00:00 2001
From: cyfraeviolae <cyfraeviolae>
Date: Sat, 2 Jan 2021 11:56:39 -0500
Subject: grey

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

(limited to 'src')

diff --git a/src/Lib.hs b/src/Lib.hs
index 02ef79b..5188950 100644
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -318,7 +318,7 @@ instance ToHtml HomeView where
                     input_ $ [type_ "checkbox", name_ "m", value_ tagm, id_ tagm] ++
                             [checked_ | tagm == "ReligiousArchitecture"] ++
                             [disabled_ "1" | disabled]
-                    label_ [for_ tagm] $ do
+                    label_ (for_ tagm : [class_ "disabled" | disabled]) $ do
                         span_ $ strong_ $ toHtml label <> ". "
                         if disabled
                            then span_ "Coming soon."
-- 
cgit v1.2.3