aboutsummaryrefslogtreecommitdiff
path: root/guix/grafts.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix/grafts.scm')
-rw-r--r--guix/grafts.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/guix/grafts.scm b/guix/grafts.scm
index 6b78a784e7..5074809c43 100644
--- a/guix/grafts.scm
+++ b/guix/grafts.scm
@@ -44,8 +44,10 @@
(replacement-output graft-replacement-output ;string | #f
(default "out")))
-(define* (graft-derivation store name drv grafts
- #:key (guile (%guile-for-build))
+(define* (graft-derivation store drv grafts
+ #:key
+ (name (derivation-name drv))
+ (guile (%guile-for-build))
(system (%current-system)))
"Return a derivation called NAME, based on DRV but with all the GRAFTS
applied."