summaryrefslogtreecommitdiff
path: root/src/Color.hs
blob: 1d63fcdaec20369fce8b0cb972312f9d7e3a7499 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
module Color where

red :: String -> String
red s = "\x001b[31m" ++ s ++ "\x001b[0m"

green :: String -> String
green s = "\x001b[32m" ++ s ++ "\x001b[0m"

yellow :: String -> String
yellow s = "\x001b[33m" ++ s ++ "\x001b[0m"

blue :: String -> String
blue s = "\x001b[34m" ++ s ++ "\x001b[0m"