diff options
Diffstat (limited to 'app/Issue')
-rw-r--r-- | app/Issue/Tag.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/app/Issue/Tag.hs b/app/Issue/Tag.hs index af12331..7147cb1 100644 --- a/app/Issue/Tag.hs +++ b/app/Issue/Tag.hs @@ -1,14 +1,17 @@ {-# LANGUAGE LambdaCase #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE ViewPatterns #-} +{-# LANGUAGE DeriveAnyClass #-} module Issue.Tag (Tag (..), extractTags, internalTags) where import Data.Maybe (catMaybes) import Data.Text (Text) import Data.Text qualified as T +import Data.Binary (Binary) +import GHC.Generics (Generic) -data Tag = Tag Text Text deriving (Show) +data Tag = Tag Text Text deriving (Show, Generic, Binary) extractTags :: Text -> [Tag] extractTags = |