~ruther/guix-local

6366e7cac5bf3b1a75c799f320cb91fa6b41b9a6 — Efraim Flashner 6 years ago 92951bf
gnu: Add rust-gettext-rs-0.5.

* gnu/packages/crates-io.scm (rust-gettext-rs-0.5): New variable.
(rust-gettext-rs-0.4): Inherit from rust-gettext-rs-0.5.
1 files changed, 30 insertions(+), 4 deletions(-)

M gnu/packages/crates-io.scm
M gnu/packages/crates-io.scm => gnu/packages/crates-io.scm +30 -4
@@ 8986,10 8986,10 @@ API library @code{gdi32}.")
retrieving random data from system source.")
    (license (list license:expat license:asl2.0))))

(define-public rust-gettext-rs-0.4
(define-public rust-gettext-rs-0.5
  (package
    (name "rust-gettext-rs")
    (version "0.4.4")
    (version "0.5.0")
    (source
      (origin
        (method url-fetch)


@@ 8998,12 8998,12 @@ retrieving random data from system source.")
         (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "0z6fcsn1g3w9mlgfj6ln6qvqf8610w3zwvk6g062h657v114lifz"))))
          "1qc9a63i54b9ad3jx951hn7xb6xf76c9f3hmi2cdy2m7rhczm58v"))))
    (build-system cargo-build-system)
    (arguments
     `(#:cargo-inputs
       (("rust-gettext-sys" ,rust-gettext-sys-0.19)
        ("rust-locale-config" ,rust-locale-config-0.2))
        ("rust-locale-config" ,rust-locale-config-0.3))
       #:phases
       (modify-phases %standard-phases
         (add-after 'configure 'use-system-gettext


@@ 9018,6 9018,32 @@ retrieving random data from system source.")
    (description "This package provides GNU Gettext FFI bindings for Rust.")
    (license license:expat)))

(define-public rust-gettext-rs-0.4
  (package
    (inherit rust-gettext-rs-0.5)
    (name "rust-gettext-rs")
    (version "0.4.4")
    (source
      (origin
        (method url-fetch)
        (uri (crate-uri "gettext-rs" version))
        (file-name
         (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
          "0z6fcsn1g3w9mlgfj6ln6qvqf8610w3zwvk6g062h657v114lifz"))))
    (arguments
     `(#:cargo-inputs
       (("rust-gettext-sys" ,rust-gettext-sys-0.19)
        ("rust-locale-config" ,rust-locale-config-0.2))
       #:phases
       (modify-phases %standard-phases
         (add-after 'configure 'use-system-gettext
           (lambda* (#:key inputs #:allow-other-keys)
             (let ((gettext (assoc-ref inputs "gettext")))
               (setenv "GETTEXT_SYSTEM" gettext)
               #t))))))))

(define-public rust-gettext-sys-0.19
  (package
    (name "rust-gettext-sys")