propellor spin
This commit is contained in:
parent
fa40a94b81
commit
de5fad970e
|
@ -41,6 +41,7 @@ fromMarked marker s
|
||||||
|
|
||||||
sendMarked :: Handle -> Marker -> String -> IO ()
|
sendMarked :: Handle -> Marker -> String -> IO ()
|
||||||
sendMarked h marker s = do
|
sendMarked h marker s = do
|
||||||
|
debug ["sent req", marker]
|
||||||
-- Prefix string with newline because sometimes a
|
-- Prefix string with newline because sometimes a
|
||||||
-- incomplete line has been output, and the marker needs to
|
-- incomplete line has been output, and the marker needs to
|
||||||
-- come at the start of a line.
|
-- come at the start of a line.
|
||||||
|
|
Loading…
Reference in New Issue