diff options
author | Joey Hess <joeyh@joeyh.name> | 2017-05-04 13:14:33 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2017-05-04 13:14:33 -0400 |
commit | 2cd4c53ece2d935b044c65802824810eb712b1c2 (patch) | |
tree | 1b07d81d518c5655cb7eedaf8d0dec035b480a8e /ControlWindow.hs | |
parent | ee4f328031c8072868854ebcd5a1e5b628a226ae (diff) | |
download | debug-me-2cd4c53ece2d935b044c65802824810eb712b1c2.tar.gz |
reword message for length
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 |