wgaffa/deck-delta - Change CN6GCPII465OL2XX33GT6E6SGNTTVB2XDGN7HYPJL2YF5IHDRKPQC

Add Category type

Category is a new type to hold any information of a cards category within a decklist

Created by wgaffa on March 27, 2024

CN6GCPII465OL2XX33GT6E6SGNTTVB2XDGN7HYPJL2YF5IHDRKPQC

Dependencies

In channels

main

Change contents

Deletion in src/Deck.hs at line 42 [4.191]
B:BD[3.1172] → [3.1172:1195]
```
import Control.Lens.TH
```
Insertion in src/Deck.hs at line 48 [4.191]
[5.146]
[3.1216]
```
import Category (Category (..))
```
Replacement in src/Deck.hs at line 58 [4.191]
∅:D[2.33] → [3.1317:1354]
B:BD[3.1317] → [3.1317:1354]
```
    , _categories :: Map Text Copies
```
[2.33]
[5.357]
```
    , _categories :: Map Text Category
```

Replacement in src/Deck.hs at line 74 [4.191]

B:BD[3.1666] → [2.97:186]

     in Card {_internalName = cardName, _categories = Map.singleton categoryName copies}

[3.1666]

[4.213]

     in Card
            { _internalName = cardName
            , _categories = Map.singleton categoryName (Category primary copies)
            }

File addition: Category.hs (----------)

[4.157]

{-# LANGUAGE TemplateHaskell #-}
module Category (
    -- * Types
    Category (..),
    -- * Lenses
    name,
    copies,
) where
import Control.Lens
import Util
type Copies = PositiveNumber
type CategoryName = NonEmptyText
data Category = Category
    { _name :: !CategoryName
    , _copies :: !Copies
    }
    deriving (Show, Eq, Ord)
makeLenses ''Category

Insertion in mtg.cabal at line 15 [4.249]
[6.1288]
[6.1288]
```
        Category,
```

Add Category type

Dependencies

In channels

Change contents

Deletion in src/Deck.hs at line 42 [4.191]

Insertion in src/Deck.hs at line 48 [4.191]

Replacement in src/Deck.hs at line 58 [4.191]

Replacement in src/Deck.hs at line 74 [4.191]

File addition: Category.hs (----------)

Insertion in mtg.cabal at line 15 [4.249]