diff --git a/src/App/Container.purs b/src/App/Container.purs index 9350c22..b0b8637 100644 --- a/src/App/Container.purs +++ b/src/App/Container.purs @@ -311,10 +311,10 @@ render state then HH.div_ [] else Bulma.btn_ [C.is_large, C.is_danger] "You have been disconnected. Click here to reconnect." Reconnection render_auth_WS :: forall monad. MonadAff monad => H.ComponentHTML Action ChildSlots monad - render_auth_WS = HH.slot _ws_auth unit WS.component (Tuple "ws://127.0.0.1:8080" "authd") AuthenticationDaemonEvent + render_auth_WS = HH.slot _ws_auth unit WS.component (Tuple "wss://beta.netlib.re/ws/authd" "authd") AuthenticationDaemonEvent render_dnsmanager_WS :: forall monad. MonadAff monad => H.ComponentHTML Action ChildSlots monad - render_dnsmanager_WS = HH.slot _ws_dns unit WS.component (Tuple "ws://127.0.0.1:8081" "dnsmanagerd") DNSManagerDaemonEvent + render_dnsmanager_WS = HH.slot _ws_dns unit WS.component (Tuple "wss://beta.netlib.re/ws/dnsmanagerd" "dnsmanagerd") DNSManagerDaemonEvent render_notifications = case state.notif of diff --git a/user.mk b/user.mk new file mode 100644 index 0000000..791963a --- /dev/null +++ b/user.mk @@ -0,0 +1,2 @@ +provide-beta: + make serve HTTPD_PORT=35000 HTTPD_ADDR=192.168.122.181