bug#40117: closed ([PATCH] gnu: make-libiberty: use install-file.)

[GNU bug Tracking System]

Your message dated Fri, 20 Mar 2020 18:46:20 +0100
with message-id <address@hidden>
and subject line Re: [bug#40117] [PATCH] gnu: make-libiberty: use install-file.
has caused the debbugs.gnu.org bug report #40117,
regarding [PATCH] gnu: make-libiberty: use install-file.
to be marked as done.

(If you believe you have received this mail in error, please contact
address@hidden.)


-- 
40117: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=40117
GNU Bug Tracking System
Contact address@hidden with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> [PATCH] gnu: make-libiberty: use install-file.
>
>
>
>
> Date: 
>
> Wed, 18 Mar 2020 09:54:57 +0200
>
>
>
>
> * gnu/packages/gcc.scm(make-libiberty): In phase install use
>   install-file helper function to install file.
> ---
>  gnu/packages/gcc.scm | 28 ++++++++++++----------------
>  1 file changed, 12 insertions(+), 16 deletions(-)
>
> diff --git a/gnu/packages/gcc.scm b/gnu/packages/gcc.scm
> index 08afd80358..d170ae9175 100644
> --- a/gnu/packages/gcc.scm
> +++ b/gnu/packages/gcc.scm
> @@ -8,6 +8,7 @@
>  ;;; Copyright ?? 2018 Tobias Geerinckx-Rice <address@hidden>
>  ;;; Copyright ?? 2018 Marius Bakke <address@hidden>
>  ;;; Copyright ?? 2020 Joseph LaFreniere <address@hidden>
> +;;; Copyright ?? 2020 Guy Fleury Iteriteka <address@hidden>
>  ;;;
>  ;;; This file is part of GNU Guix.
>  ;;;
> @@ -578,22 +579,17 @@ using compilers other than GCC."
>         #:phases
>         (modify-phases %standard-phases
>           (add-before 'configure 'chdir
> -                     (lambda _
> -                       (chdir "libiberty")
> -                       #t))
> -         (replace
> -          'install
> -          (lambda* (#:key outputs #:allow-other-keys)
> -            (let* ((out     (assoc-ref outputs "out"))
> -                   (lib     (string-append out "/lib/"))
> -                   (include (string-append out "/include/")))
> -              (mkdir-p lib)
> -              (mkdir-p include)
> -              (copy-file "libiberty.a"
> -                         (string-append lib "libiberty.a"))
> -              (copy-file "../include/libiberty.h"
> -                         (string-append include "libiberty.h"))
> -              #t))))))
> +           (lambda _
> +             (chdir "libiberty")
> +             #t))
> +         (replace 'install
> +           (lambda* (#:key outputs #:allow-other-keys)
> +             (let* ((out     (assoc-ref outputs "out"))
> +                    (lib     (string-append out "/lib/"))
> +                    (include (string-append out "/include/")))
> +               (install-file "libiberty.a" lib)
> +               (install-file "../include/libiberty.h" include))
> +             #t)))))
>      (inputs '())
>      (outputs '("out"))
>      (native-inputs '())
> -- 
> 2.25.1
>
>
>
>
> --- End Message ---

--- Begin Message --- Subject: Re: [bug#40117] [PATCH] gnu: make-libiberty: use install-file. Date: Fri, 20 Mar 2020 18:46:20 +0100 User-agent: Notmuch/0.29.3 (https://notmuchmail.org) Emacs/26.3 (x86_64-pc-linux-gnu)

guy fleury iteriteka <address@hidden> writes:

> * gnu/packages/gcc.scm(make-libiberty): In phase install use
>   install-file helper function to install file.

Applied, thank you!

signature.asc
Description: PGP signature

--- End Message ---