diff options
| author | joe <joe@jerkface.net> | 2014-04-04 21:25:16 -0400 |
|---|---|---|
| committer | joe <joe@jerkface.net> | 2014-04-04 21:25:16 -0400 |
| commit | 24e346b0ce82b96d5add6f5af4a43caad3bebde0 (patch) | |
| tree | 32d43436b4f18f4b01aa51a2d2c54b3b826ebaea /Presence/FGConsole.hs | |
| parent | 006f17c1a1613e7e03bdd4025a0399cdb46cbd6d (diff) | |
type signatures
Diffstat (limited to 'Presence/FGConsole.hs')
| -rw-r--r-- | Presence/FGConsole.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Presence/FGConsole.hs b/Presence/FGConsole.hs index 6686e19f..623fb493 100644 --- a/Presence/FGConsole.hs +++ b/Presence/FGConsole.hs | |||
| @@ -50,6 +50,7 @@ monitorTTY handler = do | |||
| 50 | monitor | 50 | monitor |
| 51 | return (rfd,thread) | 51 | return (rfd,thread) |
| 52 | 52 | ||
| 53 | unmonitorTTY :: (Fd, ThreadId) -> IO () | ||
| 53 | unmonitorTTY (rfd,thread) = do | 54 | unmonitorTTY (rfd,thread) = do |
| 54 | closeFd rfd | 55 | closeFd rfd |
| 55 | yield | 56 | yield |