lib/Phi/Panel.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14

module Phi.Panel ( PanelConfig(..)
                 , defaultPanelConfig
                 ) where

import Phi.Types
import Phi.Widget


data PanelConfig = PanelConfig { panelPosition :: Position
                               , panelSize     :: Int
                               }

defaultPanelConfig :: PanelConfig
defaultPanelConfig = PanelConfig { panelPosition = Top, panelSize = 24 }