02/03: gnu: units: Add python input.

[Eric Bavier]

bavier pushed a commit to branch master
in repository guix.

commit 0498d24866c4955faee95a4fc19ff6817e5483d2
Author: Eric Bavier <address@hidden>
Date:   Wed Nov 1 17:12:06 2017 -0500

    gnu: units: Add python input.
    
    * gnu/packages/maths.scm (units)[inputs]: New field.
    [arguments]: New field.  Add 'wrap-units_cur phase.
---
 gnu/packages/maths.scm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index f0b3bf2..7529a41 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -200,6 +200,19 @@ programming languages.")
             (sha256 (base32
                      "11hnp3gcmcc5kci2caxw4hs6m08h2mhqs3xzqq7iafx1ha2ggwyw"))))
    (build-system gnu-build-system)
+   (inputs
+    `(("python" ,python-wrapper)        ;for 'units_cur' script
+      ("python-requests" ,python-requests)))
+   (arguments
+    `(#:phases (modify-phases %standard-phases
+                 (add-after 'install 'wrap-units_cur
+                   (lambda* (#:key outputs #:allow-other-keys)
+                     (let* ((out (assoc-ref outputs "out"))
+                            (bin (string-append out "/bin")))
+                       (wrap-program (string-append bin "/units_cur")
+                         `("PYTHONPATH" ":" prefix
+                           ,(search-path-as-string->list (getenv 
"PYTHONPATH"))))
+                       #t))))))
    (synopsis "Conversion between thousands of scales")
    (description
     "GNU Units converts numeric quantities between units of measure.  It