Disable "remove fight messages" if there are none

Janiczek · Sep 30, 2024 · 71deecb · 71deecb
1 parent ec8cb9e
commit 71deecb
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/src/Frontend.elm b/src/Frontend.elm
@@ -3495,6 +3495,7 @@ messagesView currentTime zone _ player =
     , H.div [ HA.class "flex flex-col gap-4 items-start" ]
         [ UI.button
             [ HE.onClick AskToRemoveFightMessages
+            , HA.disabled <| not (Dict.any (\_ { content } -> Message.isFightMessage content) player.messages)
             , HA.class "normal-case"
             ]
             [ H.text "[Remove fight messages]" ]

diff --git a/src/UI.elm b/src/UI.elm
@@ -18,8 +18,9 @@ button : List (Attribute msg) -> List (Html msg) -> Html msg
 button attrs content =
     H.button
         (HA.class "uppercase whitespace-pre cursor-pointer text-green-200 select-none"
-            :: TW.mod "disabled" "text-green-300"
-            :: TW.mod "hover" "text-green-100 bg-green-800"
+            :: TW.mod "disabled" "text-green-300 cursor-not-allowed"
+            :: TW.mod "hover" "text-green-100"
+            :: TW.mod "[&:not([disabled]):hover]" "bg-green-800"
             :: TW.mod "active" "text-orange"
             :: attrs
         )