about summary refs log tree commit diff
diff options
context:
space:
mode:
authorArun Isaac2023-05-31 21:46:02 +0100
committerArun Isaac2023-05-31 21:46:02 +0100
commit2782c6b141154b3563ef0fad34c69e6cccbdf7cc (patch)
tree6a2d899b8828d5c4af54c8d359a6fbb2cb084afb
parent67d3f5dc46422c6b1812547109680c147fdde341 (diff)
downloadgn-machines-2782c6b141154b3563ef0fad34c69e6cccbdf7cc.tar.gz
Do not create xapian build directory.
* genenetwork-development.scm (build-xapian-index-gexp): Do not create
xapian build directory.
-rw-r--r--genenetwork-development.scm7
1 files changed, 1 insertions, 6 deletions
diff --git a/genenetwork-development.scm b/genenetwork-development.scm
index 2581144..923bc23 100644
--- a/genenetwork-development.scm
+++ b/genenetwork-development.scm
@@ -280,12 +280,7 @@ genenetwork3 source from the latest commit of @var{project}."
                 (xapian-build-directory (string-append #$%xapian-directory
                                                        "/build")))
             (dynamic-wind
-              (lambda ()
-                ;; Delete xapian-build-directory in case previous
-                ;; build exited without cleaning up.
-                (when (file-exists? xapian-build-directory)
-                  (delete-file-recursively xapian-build-directory))
-                (mkdir xapian-build-directory))
+              (const #t)
               (lambda ()
                 ;; Build xapian index.
                 (setenv "PYTHONPATH" (getcwd))