bug#43841: closed ([PATCH] build-system/go: Install license files.)

[GNU bug Tracking System]

Your message dated Thu, 15 Oct 2020 11:13:31 +0300
with message-id <20201015081331.GG1237@E5400>
and subject line Re: bug#43841: Acknowledgement ([PATCH] build-system/go: 
Install license files.)
has caused the debbugs.gnu.org bug report #43841,
regarding [PATCH] build-system/go: Install license files.
to be marked as done.

(If you believe you have received this mail in error, please contact
help-debbugs@gnu.org.)


-- 
43841: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=43841
GNU Bug Tracking System
Contact help-debbugs@gnu.org with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> [PATCH] build-system/go: Install license files.
>
>
>
>
> Date: 
>
> Wed,  7 Oct 2020 10:11:56 +0300
>
>
>
>
> * guix/build/go-build-system.scm (install-license-files): New procedure.
> (%standard-phases): Replace inherited 'install-license-files phase.
> ---
>  guix/build/go-build-system.scm | 13 +++++++++++++
>  1 file changed, 13 insertions(+)
>
> diff --git a/guix/build/go-build-system.scm b/guix/build/go-build-system.scm
> index b9cb2bfd7b..227df820db 100644
> --- a/guix/build/go-build-system.scm
> +++ b/guix/build/go-build-system.scm
> @@ -4,6 +4,7 @@
>  ;;; Copyright © 2019 Maxim Cournoyer <maxim.cournoyer@gmail.com>
>  ;;; Copyright © 2020 Jack Hill <jackhill@jackhill.us>
>  ;;; Copyright © 2020 Jakub Kądziołka <kuba@kadziolka.net>
> +;;; Copyright © 2020 Efraim Flashner <efraim@flashner.co.il>
>  ;;;
>  ;;; This file is part of GNU Guix.
>  ;;;
> @@ -254,6 +255,17 @@ XXX We can't make use of compiled libraries (Go 
> \"packages\")."
>        (copy-recursively source dest #:keep-mtime? #t)))
>    #t)
>  
> +(define* (install-license-files #:key unpack-path
> +                                import-path
> +                                #:allow-other-keys
> +                                #:rest args)
> +  "Install license files matching LICENSE-FILE-REGEXP to 'share/doc'.  Adjust
> +the standard install-license-files phase to first enter the correct directory."
> +  (with-directory-excursion (string-append "src/" (if (string-null? 
> unpack-path)
> +                                                    import-path
> +                                                    unpack-path))
> +    (apply (assoc-ref gnu:%standard-phases 'install-license-files) args)))
> +
>  (define* (remove-store-reference file file-name
>                                    #:optional (store (%store-directory)))
>    "Remove from FILE occurrences of FILE-NAME in STORE; return #t when FILE-NAME
> @@ -317,6 +329,7 @@ files in OUTPUTS."
>      (replace 'build build)
>      (replace 'check check)
>      (replace 'install install)
> +    (replace 'install-license-files install-license-files)
>      (add-after 'install 'remove-go-references remove-go-references)))
>  
>  (define* (go-build #:key inputs (phases %standard-phases)
> -- 
> 2.28.0
>
>
>
>
> --- End Message ---

--- Begin Message --- Subject: Re: bug#43841: Acknowledgement ([PATCH] build-system/go: Install license files.) Date: Thu, 15 Oct 2020 11:13:31 +0300

Patch pushed!


-- 
Efraim Flashner   <efraim@flashner.co.il>   אפרים פלשנר
GPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted

signature.asc
Description: PGP signature

--- End Message ---