module Dodge.WindowLayout where import Dodge.Config.Data availableMenuLines :: Configuration -> Int availableMenuLines = floor . (/50) . subtract 125 . _windowY