gnu: imagemagick: Do not retain reference to "doc" output.

* gnu/packages/imagemagick.scm (imagemagick)[arguments]: Use 'modify-phases'.
  Add 'strip-configure-xml' phase.
This commit is contained in:
Ludovic Courtès 2015-06-22 22:45:00 +02:00
parent 0e2d0213b5
commit 790c3717d2
1 changed files with 26 additions and 16 deletions

View File

@ -47,7 +47,8 @@
"18wbsjfccxlgsdsd6h9wvhcjrsglyi086jk4bk029ik07rh81laz")))) "18wbsjfccxlgsdsd6h9wvhcjrsglyi086jk4bk029ik07rh81laz"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:phases (alist-cons-before `(#:phases (modify-phases %standard-phases
(add-before
'build 'pre-build 'build 'pre-build
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(substitute* "Makefile" (substitute* "Makefile"
@ -62,8 +63,17 @@
(let ((doc (assoc-ref outputs "doc"))) (let ((doc (assoc-ref outputs "doc")))
(string-append "DOCUMENTATION_PATH = " (string-append "DOCUMENTATION_PATH = "
doc "/share/doc/" doc "/share/doc/"
,name "-" ,version "\n"))))) ,name "-" ,version "\n"))))))
%standard-phases))) (add-before
'configure 'strip-configure-xml
(lambda _
(substitute* "config/configure.xml.in"
;; Do not record 'configure' arguments in the
;; configure.xml file that gets installed: That would
;; include --docdir, and thus retain a reference to the
;; 'doc' output.
(("@CONFIGURE_ARGS@")
"not recorded")))))))
;; TODO: Add Jasper etc. ;; TODO: Add Jasper etc.
(inputs `(("fftw" ,fftw) (inputs `(("fftw" ,fftw)
("graphviz" ,graphviz) ("graphviz" ,graphviz)