Types/Preset.hs


1
2
3
4
5
6
7
8
9
10
11

module Types.Preset where

import qualified Data.Text   as T

import           Types.State

type PresetToggleKey = Char
type PresetDesc = String
type PresetPreset = St -> St

data Preset = Preset PresetToggleKey PresetDesc PresetPreset