diff mbox series

[bug#60029,1/4] guix: copy-build-system: allow install plan directives to specify output

Message ID 57f2e77fc975bf00d1222729b0e41aef5c8a00a0.1670891520.git.me@jonscoresby.com
State New
Headers show
Series vim-build-system | expand

Commit Message

Jonathan Scoresby Dec. 13, 2022, 8:34 a.m. UTC 
---
 guix/build/copy-build-system.scm | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

Comments

\( Dec. 13, 2022, 7:05 p.m. UTC | #1 
Heya,

Wow, this is really nice work! :D

The first patch LGTM.

    -- (
diff mbox series

Patch

diff --git a/guix/build/copy-build-system.scm b/guix/build/copy-build-system.scm
index fb2d1db056..5d2a137268 100644
--- a/guix/build/copy-build-system.scm
+++ b/guix/build/copy-build-system.scm
@@ -133,8 +133,16 @@  (define* (install #:key install-plan outputs #:allow-other-keys)
                                       (string-append target "/")))
              file-list))))
 
-  (define* (install source target #:key include exclude include-regexp exclude-regexp)
-    (let ((final-target (string-append (assoc-ref outputs "out") "/" target))
+  (define* (install source
+                    target
+                    #:key include
+                    exclude
+                    include-regexp
+                    exclude-regexp
+                    output)
+    (let ((final-target (string-append (assoc-ref outputs
+                                                  (or output "out")) "/"
+                                       target))
           (filters? (or include exclude include-regexp exclude-regexp)))
       (when (and (not (file-is-directory? source))
                  filters?)