From 56f424e05e14ed20038b8b1aa6854705ccc3acd0 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Mon, 4 Jul 2022 15:46:44 +0530
Subject: git: Implement current-git-repository using repository-open-ext.

repository-open-ext obsoletes git-top-level.

* tissue/git.scm (current-git-repository): Implement using
repository-open-ext instead of git-top-level.
---
 tissue/git.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'tissue')

diff --git a/tissue/git.scm b/tissue/git.scm
index c7bf351..9e2bf59 100644
--- a/tissue/git.scm
+++ b/tissue/git.scm
@@ -60,7 +60,7 @@
 
 (define (current-git-repository)
   "Return the current git repository."
-  (repository-open (git-top-level)))
+  (repository-open-ext (getcwd) (list)))
 
 (define (head-tree repository)
   "Return tree of HEAD in REPOSITORY."
-- 
cgit v1.2.3