From 1dc9f37fe2830e12e3013aab5e5c1b024195380f Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Tue, 5 Jul 2022 11:00:02 +0530
Subject: bin: Refer to %xapian-index, not db-path, in main function.

This bug was introduced in ec434ea0710e9ece9f5239c7fe2b1f965a53bea1
when copy-pasting code.

* bin/tissue (main): Refer to %xapian-index, not db-path.
---
 bin/tissue | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/bin/tissue b/bin/tissue
index d7736c2..7b2c154 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -487,8 +487,8 @@ Pull latest from upstream repositories.
                ;; Ensure index exists, rebuilding it if it is stale.
                (let ((current-head
                       (oid->string (reference-name->oid (current-git-repository) "HEAD"))))
-                 (unless (and (file-exists? db-path)
-                              (string=? (call-with-database db-path
+                 (unless (and (file-exists? %xapian-index)
+                              (string=? (call-with-database %xapian-index
                                           (cut Database-get-metadata <> "commit"))
                                         current-head))
                    (index %xapian-index)))
-- 
cgit v1.2.3