From eafbd88429a80f058efaa4efd28fbfb8271065c3 Mon Sep 17 00:00:00 2001
From: Alexander Foremny <aforemny@posteo.de>
Date: Fri, 20 Oct 2023 09:55:13 +0200
Subject: record both creation and update in provenance

---
 app/Exception.hs | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'app/Exception.hs')

diff --git a/app/Exception.hs b/app/Exception.hs
index 83d624d..ddaef5a 100644
--- a/app/Exception.hs
+++ b/app/Exception.hs
@@ -1,6 +1,7 @@
 module Exception
   ( AnyException (..),
     InvalidTreeGrepperResult (..),
+    NoCommits (..),
     ProcessException (..),
     UnknownFileExtension (..),
   )
@@ -12,6 +13,7 @@ import System.Exit (ExitCode)
 
 data AnyException
   = InvalidTreeGrepperResult' InvalidTreeGrepperResult
+  | NoCommits' NoCommits
   | ProcessException' ProcessException
   | UnknownFileExtension' UnknownFileExtension
   deriving (Show)
@@ -25,6 +27,11 @@ data InvalidTreeGrepperResult = InvalidTreeGrepperResult
 
 instance Exception InvalidTreeGrepperResult
 
+data NoCommits = NoCommits
+  deriving (Show)
+
+instance Exception NoCommits
+
 data ProcessException = ProcessException String ExitCode LB.ByteString
   deriving (Show)
 
-- 
cgit v1.2.3