This repository was archived by the owner on Feb 6, 2024. It is now read-only.

Description
We need attributes on the deck entity too
Same type as for slide
data Deck = Deck
{ deckSlides :: [SlideId]
, deckDeckname :: Deckname
, deckOwnerId :: UserId
, deckAttributes :: HMS.HashMap T.Text T.Text -- NEW
} deriving (Show, Eq)
P.S.: Use for example to reflect a background color on the all deck
<deckgo-deck style="--background: yellow; --color: red;"/>