Fixes: https://todo.sr.ht/~whereiseveryone/guixrus/3
---
.build.yml | 8 +++++---
etc/non-guix-packages.scm | 15 +++++++++++++++
2 files changed, 20 insertions(+), 3 deletions(-)
create mode 100755 etc/non-guix-packages.scm
diff --git a/.build.yml b/.build.yml
index b2c00fa..1eb1709 100644
--- a/.build.yml
+++ b/.build.yml
@@ -2,12 +2,14 @@ image: guix
oauth: builds.sr.ht/JOBS:RW builds.sr.ht/PROFILE:RO
sources:
- https://git.sr.ht/~whereiseveryone/guixrus
-packages:
-- jq
tasks:
+- guix: |
+ cd guixrus
+ GUIX_PACKAGE_PATH=. guix install -v0 doug guile jq
- lint: |
cd guixrus
- guix lint -L . -n || true
+ guixrus_packages=$(GUIX_PACKAGE_PATH=. guile -L . -c "((@(etc non-guix-packages) display-non-guix-packages))" || true)
+ guix lint -L . -n $guixrus_packages || true
if [ "$BUILD_REASON" == patchset ]; then
complete-build # UNDOCUMENTED builds.sr.ht escape hatch
fi
diff --git a/etc/non-guix-packages.scm b/etc/non-guix-packages.scm
new file mode 100755
index 0000000..64c81c0
--- /dev/null
+++ b/etc/non-guix-packages.scm
@@ -0,0 +1,15 @@
+(define-module (etc non-guix-packages)
+ #:use-module (doug)
+ #:use-module (guix packages)
+ #:use-module (gnu packages)
+ #:export (display-non-guix-packages))
+
+(define (display-non-guix-packages)
+ (display
+ (string-join
+ (fold-packages
+ (lambda (p ps)
+ (cons (package-name p) ps))
+ '()
+ #:select? (negate guix-package?))
+ "\n")))
--
2.34.1