Subject: bug#49762: closed (Re: bug#49762: [PATCH] gnu: graphviz-2.38: Fix build failure.)

From: [email-masked] (GNU bug Tracking System)
Date: Thu, 29 Jul 2021 07:36:01 +0000

Your bug report

#49762: [PATCH] gnu: graphviz-2.38: Fix build failure.

which was filed against the guix-patches package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
49762: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=49762
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: bug#49762: [PATCH] gnu: graphviz-2.38: Fix build failure.
From: Mathieu Othacehe <[email-masked]>
To: Maxime Devos <[email-masked]>
Cc: [email-masked]
Date: Thu, 29 Jul 2021 09:34:55 +0200
List-Id: <debbugs-submit.debbugs.gnu.org>

Hey,

> * gnu/packages/graphviz.scm
>   (graphviz-2.38)[arguments]<#:phases>: Make this a G-exp.

Pushed to core-updates & core-updates-frozen.

Thanks,

Mathieu

Subject: [PATCH] gnu: graphviz-2.38: Fix build failure.
From: Maxime Devos <[email-masked]>
To: [email-masked]
Cc: Maxime Devos <[email-masked]>
Date: Wed, 28 Jul 2021 23:32:23 +0200
List-Id: <debbugs-submit.debbugs.gnu.org>

* gnu/packages/graphviz.scm
  (graphviz-2.38)[arguments]<#:phases>: Make this a G-exp.
---
 gnu/packages/graphviz.scm | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/gnu/packages/graphviz.scm b/gnu/packages/graphviz.scm
index 43eaecace4..eaddfb29c4 100644
--- a/gnu/packages/graphviz.scm
+++ b/gnu/packages/graphviz.scm
@@ -150,19 +150,19 @@ interfaces for other technical domains.")
       (arguments
        (substitute-keyword-arguments (package-arguments graphviz)
          ((#:phases phases)
-          `(modify-phases ,phases
-             (add-after 'unpack 'prepare-bootstrap
-               (lambda _
-                 (substitute* "autogen.sh"
-                   (("/bin/sh") (which "sh"))
-                   (("\\$GRAPHVIZ_VERSION_DATE") "0"))
-                 (setenv "CONFIG_SHELL" (which "sh"))
-                 (setenv "SHELL" (which "sh"))
+          #~(modify-phases #$phases
+              (add-after 'unpack 'prepare-bootstrap
+                (lambda _
+                  (substitute* "autogen.sh"
+                    (("/bin/sh") (which "sh"))
+                    (("\\$GRAPHVIZ_VERSION_DATE") "0"))
+                  (setenv "CONFIG_SHELL" (which "sh"))
+                  (setenv "SHELL" (which "sh"))
 
-                 (map make-file-writable (find-files "." ".*"))
-                 #t))
-             (replace 'bootstrap
-               (lambda _ (invoke (which "sh") "autogen.sh" "NOCONFIG") #t))))))
+                  (map make-file-writable (find-files "." ".*"))
+                  #t))
+              (replace 'bootstrap
+                (lambda _ (invoke (which "sh") "autogen.sh" "NOCONFIG") #t))))))
       (native-inputs
        `(("autoconf" ,autoconf)
          ("automake" ,automake)
-- 
2.32.0