From d9400635bcb28674c8510d71aa6eed94194bf669 Mon Sep 17 00:00:00 2001
From: Alexander Foremny <aforemny@posteo.de>
Date: Tue, 7 Nov 2023 14:53:26 +0100
Subject: add issue marker as internal tag @type

---
 app/History/CommitInfo.hs | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'app/History')

diff --git a/app/History/CommitInfo.hs b/app/History/CommitInfo.hs
index c24fcd9..865fcc4 100644
--- a/app/History/CommitInfo.hs
+++ b/app/History/CommitInfo.hs
@@ -59,7 +59,11 @@ fromPartialCommitInfos (partialCommitInfo : partialCommitInfos) =
                             )
                               <$> old.provenance
                               <*> new.provenance,
-                          internalTags = I.internalTags new.title old.provenance
+                          internalTags =
+                            I.internalTags
+                              new.title
+                              old.provenance
+                              (I.tagValuesOf "type" new.internalTags)
                         }
                 )
                 ( \old ->
-- 
cgit v1.2.3