updates for production env

src/Main.elm

@@ -60,7 +60,11 @@ setPage page model =
 
 
 init : () -> Url.Url -> Nav.Key -> ( Model, Cmd Msg )
-init _ _ key =
+init _ url key =
+    let
+        _ =
+            Debug.log "init with url" (Debug.toString url)
+    in
     ( { navbar = initNavbar key
       , page = Page.Loading
       }
@@ -165,6 +169,10 @@ update msg model =
         ( LinkClicked urlRequest, _ ) ->
             case urlRequest of
                 Browser.Internal url ->
+                    let
+                        _ =
+                            Debug.log "internal url request" (Debug.toString url)
+                    in
                     ( model, Nav.pushUrl model.navbar.navKey (Url.toString url) )
 
                 Browser.External href ->