ribosome-0.3.0.0: lib/Ribosome/Menu/Prompt/Data/PromptState.hs

{-# LANGUAGE TemplateHaskell #-}

module Ribosome.Menu.Prompt.Data.PromptState where

data PromptState =
  Insert
  |
  Normal
  |
  Quit
  deriving (Eq, Show)

deepLenses ''PromptState