gnu: graphviz-2.38: Fix build failure.

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

Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
Maxime Devos 2021-07-28 23:32:23 +02:00 committed by Mathieu Othacehe
parent 29a1c93b72
commit b4c86e6dbc
No known key found for this signature in database
GPG key ID: 8354763531769CA6

View file

@ -150,19 +150,20 @@ (define-public graphviz-2.38
(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)