on master help sign in
-

Ignore-this: ed1689fd1187384dffb8225d4eaeaa50 darcs-hash:20100907181236-f0a0d-4027e4433bf0e5d82fde28a8f4cb404e0dfccaaf.gz

commit454287da9d02b4ec27b9cb253f7babd05571bcdc authorcoreyoconnor <coreyoconnor@gmail.com> dateTue 7 Sep 2010, 11:12 (16 years ago) parentd5c51d2
2 files changed+6
src/Graphics/Vty/Inline.hs+5 src/Graphics/Vty/Terminal/TerminfoBased.hs+1
src/Graphics/Vty/Inline.hs+5
@@ -20,6 +20,11 @@
2020-- release_terminal t
2121-- @
2222--
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+--
2328-- Copyright 2009-2010 Corey O'Connor
2429{-# LANGUAGE BangPatterns #-}
2530module Graphics.Vty.Inline ( module Graphics.Vty.Inline
src/Graphics/Vty/Terminal/TerminfoBased.hs+1
@@ -178,6 +178,7 @@ instance Terminal Term where
178178 -- otherwise there may still be data in GHC's internal stdout buffer.
179179 -- _ <- handleToFd stdout
180180 hPutBuf (term_handle t) out_ptr (fromEnum out_byte_count)
181+ hFlush (term_handle t)
181182
182183 output_handle t = return (term_handle t)
183184