~ruther/guix-local

ff77d323cbc33490dba3a3c2f53293d9bb5d2a8d — Sharlatan Hellseher 8 months ago b6827b3
gnu: python-pycparser: Improve style.

* gnu/packages/python-xyz.scm (python-pycparser): Use G-expressions, fix
indentation.

Change-Id: I006ae084642e0e15468a2717a59e64cfdf050108
1 files changed, 22 insertions(+), 21 deletions(-)

M gnu/packages/python-xyz.scm
M gnu/packages/python-xyz.scm => gnu/packages/python-xyz.scm +22 -21
@@ 13013,30 13013,31 @@ a multithreaded image-processing system with low memory needs.")
    (version "2.21")
    (source
     (origin
      (method url-fetch)
      (uri (pypi-uri "pycparser" version))
      (sha256
       (base32
        "01kjlyn5w2nn2saj8w1rhq7v26328pd91xwgqn32z1zp2bngsi76"))))
       (method url-fetch)
       (uri (pypi-uri "pycparser" version))
       (sha256
        (base32
         "01kjlyn5w2nn2saj8w1rhq7v26328pd91xwgqn32z1zp2bngsi76"))))
    (outputs '("out" "doc"))
    (build-system python-build-system)
    (arguments
     `(#:phases
       (modify-phases %standard-phases
         (replace 'check
           (lambda _
             (invoke "python" "-m" "unittest" "discover")))
         (add-after 'install 'install-doc
           (lambda* (#:key outputs #:allow-other-keys)
             (let* ((data (string-append (assoc-ref outputs "doc") "/share"))
                    (doc (string-append data "/doc/" ,name "-" ,version))
                    (examples (string-append doc "/examples")))
               (mkdir-p examples)
               (for-each (lambda (file)
                           (copy-file (string-append "." file)
                                      (string-append doc file)))
                         '("/README.rst" "/CHANGES" "/LICENSE"))
               (copy-recursively "examples" examples)))))))
     (list
      #:phases
      #~(modify-phases %standard-phases
          (replace 'check
            (lambda _
              (invoke "python" "-m" "unittest" "discover")))
          (add-after 'install 'install-doc
            (lambda _
              (let* ((data (string-append #$output:doc "/share"))
                     (doc (string-append data "/doc/" #$name "-" #$version))
                     (examples (string-append doc "/examples")))
                (mkdir-p examples)
                (for-each (lambda (file)
                            (copy-file (string-append "." file)
                                       (string-append doc file)))
                          '("/README.rst" "/CHANGES" "/LICENSE"))
                (copy-recursively "examples" examples)))))))
    (home-page "https://github.com/eliben/pycparser")
    (synopsis "C parser in Python")
    (description