7 lines
164 B
Haskell
7 lines
164 B
Haskell
module Dodge.WindowLayout where
|
|
|
|
import Dodge.Data.Config
|
|
|
|
availableMenuLines :: Configuration -> Int
|
|
availableMenuLines = floor . (/ 50) . subtract 125 . _windowY
|