summaryrefslogtreecommitdiffhomepage
path: root/Role/Developer.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Role/Developer.hs')
-rw-r--r--Role/Developer.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Role/Developer.hs b/Role/Developer.hs
index d210e50..36cc600 100644
--- a/Role/Developer.hs
+++ b/Role/Developer.hs
@@ -51,7 +51,7 @@ run' runner url = do
void $ runClientApp app
developer :: TMVar (TVar DeveloperState) -> TMChan (Message Entered) -> TMChan AnyMessage -> SessionID -> IO ()
-developer dsv ichan ochan sid = withSessionLogger sid $ \logger -> do
+developer dsv ichan ochan sid = withSessionLogger (Just "remote") sid $ \logger -> do
sk <- genMySessionKey
(controlinput, controloutput) <- openControlWindow
displayInControlWindow controlinput