Files
loop/src/Dodge/WindowLayout.hs
T
2022-06-25 09:28:45 +01:00

6 lines
162 B
Haskell

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