Add MenuToggle action for all variants

Confidenceman02 · Oct 13, 2024 · ee800ef · ee800ef
1 parent db0585f
commit ee800ef
Showing 1 changed file with 10 additions and 3 deletions.
diff --git a/src/Select.elm b/src/Select.elm
@@ -1951,13 +1951,13 @@ update msg ((State state_) as wrappedState) =
                 resolveAction =
                     case state_.inputValue of
                         Just "" ->
-                            Nothing
+                            Just (MenuToggle MenuClose)
 
                         Just _ ->
                             Just (InputChange "")
 
                         _ ->
-                            Nothing
+                            Just (MenuToggle MenuClose)
 
                 ( _, State stateWithClosedMenu, cmdWithClosedMenu ) =
                     update CloseMenu (State state_)
@@ -2068,8 +2068,15 @@ update msg ((State state_) as wrappedState) =
 
                         _ ->
                             internalFocus idString OnInputFocused
+
+                toggleAction =
+                    if state_.menuOpen then
+                        MenuToggle MenuOpen
+
+                    else
+                        MenuToggle MenuClose
             in
-            ( Nothing
+            ( Just toggleAction
             , State { updatedState | controlUiFocused = Just Internal.ControlInput }
             , focusCmd
             )