nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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

* gnu/packages/python.scm (python-pyparsing)[arguments]<#:phases>: Use
'modify-phases'.
This commit is contained in:
Marius Bakke 2017-07-22 15:24:54 +02:00
parent 6e864d0081
commit 007176e710
No known key found for this signature in database
GPG Key ID: A2A06DF2A33A54FA
1 changed files with 17 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
gnu/packages/python.scm
View File

@ -3955,26 +3955,24 @@ library, libgit2 implements Git plumbing.")
(outputs '("out" "doc"))
(arguments
`(#:tests? #f ; no test target
#:modules ((guix build python-build-system)
(guix build utils))
#:phases
(alist-cons-after
'install 'install-doc
(lambda* (#:key outputs #:allow-other-keys)
(let* ((doc (string-append (assoc-ref outputs "doc")
"/share/doc/" ,name "-" ,version))
(html-doc (string-append doc "/html"))
(examples (string-append doc "/examples")))
(mkdir-p html-doc)
(mkdir-p examples)
(for-each
(lambda (dir tgt)
(map (lambda (file)
(install-file file tgt))
(find-files dir ".*")))
(list "docs" "htmldoc" "examples")
(list doc html-doc examples))))
%standard-phases)))
(modify-phases %standard-phases
(add-after 'install 'install-doc
(lambda* (#:key outputs #:allow-other-keys)
(let* ((doc (string-append (assoc-ref outputs "doc")
"/share/doc/" ,name "-" ,version))
(html-doc (string-append doc "/html"))
(examples (string-append doc "/examples")))
(mkdir-p html-doc)
(mkdir-p examples)
(for-each
(lambda (dir tgt)
(map (lambda (file)
(install-file file tgt))
(find-files dir ".*")))
(list "docs" "htmldoc" "examples")
(list doc html-doc examples))
#t))))))
(home-page "http://pyparsing.wikispaces.com")
(synopsis "Python parsing class library")
(description