diff --git a/src/App/WS.purs b/src/App/WS.purs index 696c625..f6ca879 100644 --- a/src/App/WS.purs +++ b/src/App/WS.purs @@ -109,7 +109,12 @@ render { wsInfo } ] else HH.p_ - [ renderFootnote "NOTE: A 'Reconnect?' button will appear if the connection drops" + [ renderFootnote $ + "NOTE: A 'Reconnect?' button will appear if the connection drops (for URL: '" + <> + wsInfo.url + <> + "')" ] handleAction :: forall m. MonadAff m => Action -> H.HalogenM State Action () Output m Unit