gnu: python-cairocffi: Use 'modify-phases' syntax.

* gnu/packages/python.scm (python-cairocffi)[arguments]: Use 'modify-phases'.
This commit is contained in:
Marius Bakke 2016-12-13 19:28:27 +01:00 committed by Leo Famulari
parent e2816ac72d
commit 6734c7bae3
No known key found for this signature in database
GPG key ID: 2646FA30BACA7F08

View file

@ -4278,24 +4278,24 @@ (define-public python-cairocffi
`(("python-xcffib" ,python-xcffib))) ; used at run time
(arguments
`(#:phases
(alist-cons-after
'install 'install-doc
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((data (string-append (assoc-ref outputs "doc") "/share"))
(doc (string-append data "/doc/" ,name "-" ,version))
(html (string-append doc "/html")))
(setenv "LD_LIBRARY_PATH"
(string-append (assoc-ref inputs "cairo") "/lib" ":"
(assoc-ref inputs "gdk-pixbuf") "/lib"))
(setenv "LANG" "en_US.UTF-8")
(mkdir-p html)
(for-each (lambda (file)
(copy-file (string-append "." file)
(string-append doc file)))
'("/README.rst" "/CHANGES" "/LICENSE"))
(system* "python" "setup.py" "build_sphinx")
(copy-recursively "docs/_build/html" html)))
%standard-phases)))
(modify-phases %standard-phases
(add-after 'install 'install-doc
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((data (string-append (assoc-ref outputs "doc") "/share"))
(doc (string-append data "/doc/" ,name "-" ,version))
(html (string-append doc "/html")))
(setenv "LD_LIBRARY_PATH"
(string-append (assoc-ref inputs "cairo") "/lib" ":"
(assoc-ref inputs "gdk-pixbuf") "/lib"))
(setenv "LANG" "en_US.UTF-8")
(mkdir-p html)
(for-each (lambda (file)
(copy-file (string-append "." file)
(string-append doc file)))
'("/README.rst" "/CHANGES" "/LICENSE"))
(system* "python" "setup.py" "build_sphinx")
(copy-recursively "docs/_build/html" html)
#t))))))
(home-page "https://github.com/SimonSapin/cairocffi")
(synopsis "Python bindings and object-oriented API for Cairo")
(description