ibis/src/Types.hs

11 lines
173 B
Haskell
Raw Normal View History

2019-01-29 22:55:45 +00:00
module Types where
2019-01-30 22:10:00 +00:00
import qualified Data.Text as T
2019-01-29 22:55:45 +00:00
data Options = Options
2019-01-30 22:10:00 +00:00
{ optFullscreen :: Bool
2019-01-29 22:55:45 +00:00
, optFlipScreens :: Bool
2019-01-30 22:10:00 +00:00
, optFile :: T.Text
2019-01-29 22:55:45 +00:00
}
deriving (Show)