add 'AI Prompt' tooltip to AI button at bottom-left

gingko · Sep 25, 2024 · 200ac80 · 200ac80
1 parent 02a5537
commit 200ac80
Show file tree

Hide file tree

Showing 4 changed files with 54 additions and 6 deletions.
diff --git a/src/elm/Doc/UI.elm b/src/elm/Doc/UI.elm
@@ -717,9 +717,19 @@ viewAIPrompt ctrlOrCmd isWaiting promptInputMsg =
         ]
 
 
-viewAIButton : msg -> Html msg
-viewAIButton aiPromptMsg =
-    div [ id "ai-prompt-button", onClick aiPromptMsg ]
+viewAIButton :
+    { openAIPrompt : msg
+    , tooltipRequested : String -> TooltipPosition -> TranslationId -> msg
+    , tooltipClosed : msg
+    }
+    -> Html msg
+viewAIButton msgs =
+    div
+        [ id "ai-prompt-button"
+        , onClick msgs.openAIPrompt
+        , onMouseEnter <| msgs.tooltipRequested "ai-prompt-button" RightTooltip TooltipAIPrompt
+        , onMouseLeave msgs.tooltipClosed
+        ]
         [ AntIcons.robotOutlined [ width 12, height 12 ] ]
 
 

diff --git a/src/elm/Page/App.elm b/src/elm/Page/App.elm
@@ -1903,7 +1903,10 @@ applyParentMsg parentMsg ( prevModel, prevCmd ) =
             ( { prevModel | tooltip = Nothing }, prevCmd )
 
         OpenAIPrompt ->
-            ( { prevModel | modalState = AIPrompt False "" }
+            ( { prevModel
+                | modalState = AIPrompt False ""
+                , tooltip = Nothing
+              }
             , Cmd.batch
                 [ prevCmd
                 , Task.attempt (always NoOp) (Browser.Dom.focus "ai-prompt-textarea")
@@ -2360,7 +2363,12 @@ viewModal globalData session modalState =
     case modalState of
         NoModal ->
             if Feature.enabled AIPromptFeature session then
-                [ UI.viewAIButton AIButtonClicked ]
+                [ UI.viewAIButton
+                    { openAIPrompt = AIButtonClicked
+                    , tooltipRequested = TooltipRequested
+                    , tooltipClosed = TooltipClosed
+                    }
+                ]
 
             else
                 []

diff --git a/src/elm/Page/Doc.elm b/src/elm/Page/Doc.elm
@@ -797,7 +797,7 @@ incoming incomingMsg model =
                 "mod+shift+down" ->
                     normalMode model (mergeDown activeId)
 
-                "mod+shift+k" -> 
+                "mod+shift+k" ->
                     normalMode model (mergeUp activeId)
 
                 "mod+shift+up" ->

diff --git a/src/elm/Translation.elm b/src/elm/Translation.elm
@@ -131,6 +131,7 @@ type TranslationId
     | InsertBelowTitle
     | AddAboveAction
     | AIFeatures
+    | TooltipAIPrompt
     | ToOpenAIPrompt
     | AIGenerateChildren
     | AIGenerateBelow
@@ -3617,6 +3618,35 @@ tr lang trans =
                     , nb = "%nb:AIFeatures%"
                     }
 
+                TooltipAIPrompt ->
+                    { en = "AI Prompt"
+                    , zh_hans = "%zh_hans:TooltipAIPrompt%"
+                    , zh_hant = "%zh_hant:TooltipAIPrompt%"
+                    , es = "%es:TooltipAIPrompt%"
+                    , ar = "%ar:TooltipAIPrompt%"
+                    , fr = "%fr:TooltipAIPrompt%"
+                    , ru = "%ru:TooltipAIPrompt%"
+                    , de = "%de:TooltipAIPrompt%"
+                    , ja = "%ja:TooltipAIPrompt%"
+                    , pes = "%pes:TooltipAIPrompt%"
+                    , it = "%it:TooltipAIPrompt%"
+                    , ro = "%ro:TooltipAIPrompt%"
+                    , hr = "%hr:TooltipAIPrompt%"
+                    , nl = "%nl:TooltipAIPrompt%"
+                    , hu = "%hu:TooltipAIPrompt%"
+                    , sv = "%sv:TooltipAIPrompt%"
+                    , ca = "%ca:TooltipAIPrompt%"
+                    , br = "%br:TooltipAIPrompt%"
+                    , mr = "%mr:TooltipAIPrompt%"
+                    , cs = "%cs:TooltipAIPrompt%"
+                    , fa = "%fa:TooltipAIPrompt%"
+                    , id = "%id:TooltipAIPrompt%"
+                    , ko = "%ko:TooltipAIPrompt%"
+                    , pl = "%pl:TooltipAIPrompt%"
+                    , uk = "%uk:TooltipAIPrompt%"
+                    , nb = "%nb:TooltipAIPrompt%"
+                    }
+
                 ToOpenAIPrompt ->
                     { en = "to open AI Prompt"
                     , zh_hans = "%zh_hans:ToOpenAIPrompt%"