diff options
Diffstat (limited to 'ControlWindow.hs')
| -rw-r--r-- | ControlWindow.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ControlWindow.hs b/ControlWindow.hs index 5163a95..a91adc0 100644 --- a/ControlWindow.hs +++ b/ControlWindow.hs @@ -167,7 +167,7 @@ askToAllow ochan promptchan responsechan k@(GpgSigned pk _) = do atomically $ writeTMChan ochan $ ControlOutputAction $ SessionKeyRejected pk accept = do - putStrLn "Accepting their connection. They can now enter commands in this debug-me session." + putStrLn "Connection accepted. They can now enter commands in this debug-me session." putStrLn "(And, you can type in this window to chat with them.)" atomically $ writeTMChan ochan $ ControlOutputAction $ SessionKeyAccepted pk |