From ef5f4581f31ec35a4b2afefbafac56f175566879 Mon Sep 17 00:00:00 2001
From: Fabian Kirchner <kirchner@posteo.de>
Date: Sat, 14 Oct 2023 12:11:38 +0200
Subject: add basic caching of Issue's

---
 app/Issue/Tag.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'app/Issue/Tag.hs')

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 =
-- 
cgit v1.2.3