Fix background colors

alx741 · alx741 · commit d775aaa3da93 · 2017-05-01T20:10:19.000-05:00
diff --git a/src/Tldr.hs b/src/Tldr.hs
@@ -24,7 +24,6 @@ data ConsoleSetting = ConsoleSetting
   , fgIntensity :: ColorIntensity
   , fgColor :: Color
   , bgIntensity :: ColorIntensity
-  , bgColor :: Color
   , consoleIntensity :: ConsoleIntensity
   }
 
@@ -37,7 +36,6 @@ defConsoleSetting =
   , fgIntensity = Dull
   , fgColor = White
   , bgIntensity = Dull
-  , bgColor = Black
   , consoleIntensity = NormalIntensity
   }
 
@@ -54,7 +52,6 @@ toSGR cons =
   , SetUnderlining (underline cons)
   , SetBlinkSpeed (blink cons)
   , SetColor Foreground (fgIntensity cons) (fgColor cons)
-  , SetColor Background (bgIntensity cons) (bgColor cons)
   ]
 
 renderNode :: NodeType -> IO ()

Original file line number	Diff line number	Diff line change
`@@ -24,7 +24,6 @@ data ConsoleSetting = ConsoleSetting`
`24`	`24`	`, fgIntensity :: ColorIntensity`
`25`	`25`	`, fgColor :: Color`
`26`	`26`	`, bgIntensity :: ColorIntensity`
`27`		`- , bgColor :: Color`
`28`	`27`	`, consoleIntensity :: ConsoleIntensity`
`29`	`28`	`}`
`30`	`29`
`@@ -37,7 +36,6 @@ defConsoleSetting =`
`37`	`36`	`, fgIntensity = Dull`
`38`	`37`	`, fgColor = White`
`39`	`38`	`, bgIntensity = Dull`
`40`		`- , bgColor = Black`
`41`	`39`	`, consoleIntensity = NormalIntensity`
`42`	`40`	`}`
`43`	`41`
`@@ -54,7 +52,6 @@ toSGR cons =`
`54`	`52`	`, SetUnderlining (underline cons)`
`55`	`53`	`, SetBlinkSpeed (blink cons)`
`56`	`54`	`, SetColor Foreground (fgIntensity cons) (fgColor cons)`
`57`		`- , SetColor Background (bgIntensity cons) (bgColor cons)`
`58`	`55`	`]`
`59`	`56`
`60`	`57`	`renderNode :: NodeType -> IO ()`