mensam-0
Safe HaskellSafe-Inferred
LanguageGHC2021

Mensam.Client.UI.Desks

Documentation

desksListInitial :: GenericList ClientName Seq DeskWithInfo Source #

newtype NewDeskInfo Source #

Constructors

MkNewDeskInfo 

Fields

newDeskInfoName :: Lens' NewDeskInfo Text Source #

newDeskFormInitial :: Form NewDeskInfo e ClientName Source #

data NewReservationInfo Source #

Constructors

MkNewReservationInfo 

Fields

newReservationInfoTimeEnd :: Lens' NewReservationInfo Text Source #

newReservationInfoTimeBegin :: Lens' NewReservationInfo Text Source #

newReservationInfoDesk :: Lens' NewReservationInfo Text Source #

newReservationFormInitial :: Desk -> Form NewReservationInfo e ClientName Source #

data ScreenDesksState Source #

Constructors

MkScreenDesksState 

Fields

screenStateDesksTimezone :: Lens' ScreenDesksState TimeZone Source #

screenStateDesksSpace :: Lens' ScreenDesksState Space Source #

screenStateDesksShowHelp :: Lens' ScreenDesksState Bool Source #

screenStateDesksPreviewDay :: Lens' ScreenDesksState Day Source #

screenStateDesksNewDeskForm :: Lens' ScreenDesksState (Maybe (Form NewDeskInfo ClientEvent ClientName)) Source #

screenStateDesksList :: Lens' ScreenDesksState (GenericList ClientName Seq DeskWithInfo) Source #

screenStateDesksCreateReservation :: Lens' ScreenDesksState (Maybe (Form NewReservationInfo ClientEvent ClientName)) Source #

desksDraw :: ScreenDesksState -> [Widget ClientName] Source #

desksHandleEvent :: BrickEvent ClientName ClientEvent -> ApplicationT (EventM ClientName ScreenDesksState) () Source #

prettyReservations :: TimeZone -> Day -> [Reservation] -> Text Source #