aboutsummaryrefslogtreecommitdiff
path: root/guix/forge
diff options
context:
space:
mode:
Diffstat (limited to 'guix/forge')
-rw-r--r--guix/forge/forge.scm12
1 files changed, 5 insertions, 7 deletions
diff --git a/guix/forge/forge.scm b/guix/forge/forge.scm
index c66d084..1871a12 100644
--- a/guix/forge/forge.scm
+++ b/guix/forge/forge.scm
@@ -413,13 +413,11 @@ that were built."
(inferior-eval
'(parameterize ((%daemon-socket-uri #$guix-daemon-uri))
(with-store store
- (map (compose derivation-file-name
- (match-lambda
- ((? package? pkg)
- (parameterize ((%graft? #false))
- (run-with-store store
- (package->derivation pkg))))
- (item (error "Unknown item" item))))
+ (map (lambda (item)
+ (derivation-file-name
+ (parameterize ((%graft? #false))
+ (run-with-store store
+ (lower-object item)))))
#$(if variables
#~(map (match-lambda
((module-name variable-name)