grey

2 files changed, 4 insertions, 1 deletions

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."
diff --git a/static/style.css b/static/style.css
index b46b683..315de10 100644
--- a/static/style.css
+++ b/static/style.css
@@ -107,3 +107,6 @@ p {
 	white-space: nowrap;
 }
 
+.disabled {
+	color: grey;
+}