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

{-# LANGUAGE TemplateHaskell #-}

module Ribosome.Menu.Data.MenuUpdate where

import Control.Lens (makeClassy)

import Ribosome.Menu.Data.Menu (Menu)
import Ribosome.Menu.Data.MenuEvent (MenuEvent)

data MenuUpdate m a =
  MenuUpdate {
    _event :: MenuEvent m a,
    _menu :: Menu
  }

makeClassy ''MenuUpdate