don't show spinner when empty query is submitted

NixOS · Jul 9, 2020 · 681d44c · 681d44c
1 parent 08c5d99
commit 681d44c
Showing 1 changed file with 14 additions and 10 deletions.
diff --git a/src/Search.elm b/src/Search.elm
@@ -351,16 +351,20 @@ update path navKey result_type options decodeResultItemSource msg model =
             )
 
         QueryInputSubmit ->
-            ( { model | result = RemoteData.Loading }
-            , createUrl
-                path
-                model.channel
-                model.query
-                model.show
-                0
-                model.size
-                |> Browser.Navigation.pushUrl navKey
-            )
+            if model.query == Nothing || model.query == Just "" then
+                ( model, Cmd.none )
+
+            else
+                ( { model | result = RemoteData.Loading }
+                , createUrl
+                    path
+                    model.channel
+                    model.query
+                    model.show
+                    0
+                    model.size
+                    |> Browser.Navigation.pushUrl navKey
+                )
 
         QueryResponse result ->
             ( { model | result = result }