yi.hs configuration (modeline doesn't seem to cooperate)

yi.hs

-- in ~/.config/yi/yi.hs

import           Data.Monoid ((<>))
import           Yi (Attributes(..), Config, UIConfig(..), configUI, defaultEmacsConfig, emptyAttributes, override, yi)
import           Yi.Style (Color(..), UIStyle(..), grey, withBg, withFg)
import           Yi.Style.Library (defaultTheme)

config :: Config
config = defaultEmacsConfig
  { configUI = (configUI defaultEmacsConfig)
    { configTheme = defaultTheme `override` \super _ -> super
      { modelineAttributes = emptyAttributes { background = grey }
      , modelineFocusStyle = withBg grey <> withFg (RGB 50 100 50)
        }
      }
    }

main :: IO ()
main = yi $ config