158/401: gnu: go-github-com-ipfs-go-datastore: Fix build.

[guix-commits]

sharlatan pushed a commit to branch go-team
in repository guix.

commit 5bb0570b46eff313400c995d51e6dbfb3ae98ced
Author: Sharlatan Hellseher <sharlatanus@gmail.com>
AuthorDate: Sun Dec 15 12:58:05 2024 +0000

    gnu: go-github-com-ipfs-go-datastore: Fix build.
    
    * gnu/packages/ipfs.scm (go-github-com-ipfs-go-datastore)
    [argumetns]<test-subdirs>: Exclude "fuzz" from scope which introduces
    cyle. It provides a CLI command.
    <phases>: Add 'remove-examples.
    
    Change-Id: I0ee83bd5a386afe703d81d999c7650f7f9c42bf9
---
 gnu/packages/ipfs.scm | 25 ++++++++++++++++++++++++-
 1 file changed, 24 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/ipfs.scm b/gnu/packages/ipfs.scm
index e47221b40a..c703e63e90 100644
--- a/gnu/packages/ipfs.scm
+++ b/gnu/packages/ipfs.scm
@@ -365,7 +365,30 @@ keys used by @code{go-ipfs} (Kubo).")
     (build-system go-build-system)
     (arguments
      (list
-      #:import-path "github.com/ipfs/go-datastore"))
+      #:import-path "github.com/ipfs/go-datastore"
+      #:test-subdirs
+      #~(list "autobatch/..."
+              "delayed/..."
+              "examples/..."
+              "failstore/..."
+              ;; "fuzz/..." ; introduces cycle, for CLI
+              "keytransform/..."
+              "mount/..."
+              "namespace/..."
+              "query/..."
+              "retrystore/..."
+              "scoped/..."
+              "sync/..."
+              "test/..."
+              "trace/..."
+              ".")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'remove-examples
+            (lambda* (#:key tests? import-path #:allow-other-keys)
+              (with-directory-excursion (string-append "src/" import-path)
+                (for-each delete-file-recursively
+                          (list "examples"))))))))
     (native-inputs
      (list go-gopkg-in-check-v1))
     (propagated-inputs