git.iko.soy/vty
on master help sign in
-
454287dcoreyoconnor
src/Graphics/Vty/Inline.hs+5
compare with master
unifiedsplit
@@ -20,6 +20,11 @@
20-- release_terminal t
20-- release_terminal t
21-- @
21-- @
22--
22--
23+-- 'put_attr_change' outputs the control codes to the terminal device 'Handle'. This is a duplicate
24+-- of the 'stdout' handle when the 'terminal_handle' was (first) acquired. If 'stdout' has since been
25+-- changed then 'putStr', 'putStrLn', 'print' etc.. will output to a different 'Handle' than
26+-- 'put_attr_change'
27+--
23-- Copyright 2009-2010 Corey O'Connor
28-- Copyright 2009-2010 Corey O'Connor
24{-# LANGUAGE BangPatterns #-}
29{-# LANGUAGE BangPatterns #-}
25module Graphics.Vty.Inline ( module Graphics.Vty.Inline
30module Graphics.Vty.Inline ( module Graphics.Vty.Inline
src/Graphics/Vty/Terminal/TerminfoBased.hs+1
@@ -178,6 +178,7 @@ instance Terminal Term where
178 -- otherwise there may still be data in GHC's internal stdout buffer.
178 -- otherwise there may still be data in GHC's internal stdout buffer.
179 -- _ <- handleToFd stdout
179 -- _ <- handleToFd stdout
180 hPutBuf (term_handle t) out_ptr (fromEnum out_byte_count)
180 hPutBuf (term_handle t) out_ptr (fromEnum out_byte_count)
181+ hFlush (term_handle t)
181
182
182 output_handle t = return (term_handle t)
183 output_handle t = return (term_handle t)
183
184