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

{-# LANGUAGE TemplateHaskell #-}

module Ribosome.Menu.Prompt.Data.Prompt where

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

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

deepLenses ''Prompt