Add Pages.Msg.NoOp.

src/Pages/Internal/Platform.elm

@@ -559,6 +559,9 @@ update config appMsg model =
                     , NoEffect
                     )
 
+                Pages.Msg.NoOp ->
+                    ( model, NoEffect )
+
         UpdateCacheAndUrlNew scrollToTopWhenDone urlWithoutRedirectResolution maybeUserMsg updateResult ->
             -- TODO remove all fetchers that are in the state `FetcherReloading` here -- I think that's the right logic?
             case

src/Pages/Msg.elm

@@ -25,6 +25,7 @@ type Msg userMsg
     | SubmitIfValid String FormData Bool
     | SubmitFetcher String FormData Bool (Maybe userMsg)
     | FormFieldEvent Json.Decode.Value
+    | NoOp
 
 
 {-| -}
@@ -77,3 +78,6 @@ map mapFn msg =
 
         FormFieldEvent value ->
             FormFieldEvent value
+
+        NoOp ->
+            NoOp