git.iko.soy/vty
on bbbf971 help sign in
vty/test/vty_inline_example.hs
9 lines 236 B history raw
1import Graphics.Vty
2import Graphics.Vty.Inline
4main = do
5 putStr "Not styled. "
6 put_attr_change_ t $ back_color red >> apply_style underline
7 putStr " Styled! "
8 put_attr_change_ t $ default_all
9 putStrLn "Not styled."