summaryrefslogtreecommitdiffhomepage
path: root/Role
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2017-04-22 13:00:04 -0400
committerJoey Hess <joeyh@joeyh.name>2017-04-22 13:00:04 -0400
commit7987157bfd99b8e2ec78f5030a49c2e16bf08321 (patch)
tree68230afb5bac635426d7c50c86bbc5345e4fc4b6 /Role
parent362d3a437c16c10d221caeac21e9f685d7ddf3e6 (diff)
downloaddebug-me-7987157bfd99b8e2ec78f5030a49c2e16bf08321.tar.gz
it works
Multi-user client-server debug-me is working, almost perfectly. All that was missing was replaying the log when the developer connected. A number of race conditions had to be avoided to do that sanely. This commit was sponsored by Ignacio on Patreon.
Diffstat (limited to 'Role')
-rw-r--r--Role/Developer.hs2
1 files changed, 0 insertions, 2 deletions
diff --git a/Role/Developer.hs b/Role/Developer.hs
index 90f7606..89f6ea9 100644
--- a/Role/Developer.hs
+++ b/Role/Developer.hs
@@ -47,9 +47,7 @@ sendTtyInput :: TChan (Message Entered) -> TVar DeveloperState -> Logger -> IO (
sendTtyInput ichan devstate logger = go
where
go = do
- print "in sendTtyInput"
b <- B.hGetSome stdin 1024
- print "sending from dev"
if b == B.empty
then return ()
else send b