yi.hs

good yi.hs

{-# LANGUAGE OverloadedStrings #-}
import Yi
import Yi.Style (Color(Default))

main = yi $ myConfig

myConfig = defaultVimConfig
    { configUI = (configUI defaultVimConfig) { configTheme = myTheme }
    }

defaultColor :: Yi.Style.Color
defaultColor = Yi.Style.Default

myTheme = defaultTheme `override` \super _ -> super
    { modelineAttributes = emptyAttributes { foreground = white
                                           , background = defaultColor
                                           }
    }

janked yi.hs

{-# LANGUAGE OverloadedStrings #-}
import Yi
import Yi.Style (Color(Default))

main = yi $ myConfig

myConfig = defaultVimConfig
    { configUI = (configUI defaultVimConfig) { configTheme = myTheme }
    }

defaultColor :: Yi.Style.Color
defaultColor = Yi.Style.Default

myTheme = defaultTheme `override` \super _ -> super
    { modelineAttributes = emptyAttributes { foreground = white
                                           , background = lightGrey
                                           }
    }