summary refs log tree commit diff
diff options
context:
space:
mode:
authorArun Isaac2023-07-06 13:29:43 +0100
committerArun Isaac2023-07-06 21:12:18 +0100
commit34c771b18dbf780184ee68836276c0d0fce95108 (patch)
treecce281be385623ccb399932f9bcbb6e4bf7f9c21
parent93d506ee823b376913422c6ac4c8829bf2e88925 (diff)
downloadtissue-34c771b18dbf780184ee68836276c0d0fce95108.tar.gz
tissue-34c771b18dbf780184ee68836276c0d0fce95108.tar.lz
tissue-34c771b18dbf780184ee68836276c0d0fce95108.zip
Fix package build in channel and CI job.
* .guix/tissue-package.scm (tissue)[source]: Use ".." instead of
dirname and current-source-directory. Add constant function as
fallback for git predicate.
-rw-r--r--.guix/tissue-package.scm10
1 files changed, 5 insertions, 5 deletions
diff --git a/.guix/tissue-package.scm b/.guix/tissue-package.scm
index 305b501..ef20db2 100644
--- a/.guix/tissue-package.scm
+++ b/.guix/tissue-package.scm
@@ -55,11 +55,11 @@
 (define-public tissue
   (package
     (inherit guix:tissue)
-    (source (let ((source-directory (dirname (current-source-directory))))
-              (local-file source-directory
-                          "tissue-checkout"
-                          #:recursive? #t
-                          #:select? (git-predicate source-directory))))
+    (source (local-file ".."
+                        "tissue-checkout"
+                        #:recursive? #t
+                        #:select? (or (git-predicate "..")
+                                      (const #t))))
     (inputs
      (modify-inputs (package-inputs guix:tissue)
        (replace "guile-git" guile-git)))