From f83b424bf70b7b14b0268aeeafe1b3483fced49f Mon Sep 17 00:00:00 2001
From: Alexander Foremny <aforemny@posteo.de>
Date: Thu, 21 Mar 2024 05:35:00 +0100
Subject: chore: Git -> Backend

---
 app/Cache.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'app/Cache.hs')

diff --git a/app/Cache.hs b/app/Cache.hs
index 4540fa4..f500526 100644
--- a/app/Cache.hs
+++ b/app/Cache.hs
@@ -20,15 +20,15 @@ where
 -- @topic caching
 -- @backlog
 
+import Backend qualified
 import Data.Binary (Binary, decodeFileOrFail, encodeFile)
 import Data.Text qualified as T
-import Git qualified
 import System.Directory (createDirectoryIfMissing, doesFileExist)
 import System.FilePath ((</>))
 
 cached :: Binary a => T.Text -> IO a -> IO a
 cached key func = do
-  root <- Git.getRootDir
+  root <- Backend.getRootDir
   createDirectoryIfMissing True (root </> ".anissue")
   let file = (root </> ".anissue" </> T.unpack key)
   doesFileExist file >>= \case
-- 
cgit v1.2.3