termcolor/Main.hs

8 lines
254 B
Haskell
Raw Normal View History

2017-03-30 11:10:17 +00:00
import Text.Termcolor
import Text.Termcolor.Style
import qualified Text.Termcolor.Foreground as F
import qualified Text.Termcolor.Background as B
main = do
putStrLn $ format $ underline . bold . (light . B.cyan) . (light . F.red) $ read "Hello guys!"