ribosome-0.4.0.0: lib/Ribosome/Menu/Prompt/Data/Prompt.hs

module Ribosome.Menu.Prompt.Data.Prompt where

import Prelude hiding (state)

import Ribosome.Menu.Prompt.Data.PromptState (PromptState)

data Prompt =
  Prompt {
     _cursor :: Int,
     _state :: PromptState,
     _text :: Text
  }
  deriving (Eq, Show)

deepLenses ''Prompt