~ruther/guix-local: gnu: i3status-rust: Fix build.

2f5f658d70c54dc8aec66118d514bedfb570af24 — Tobias Geerinckx-Rice 4 years ago 9c426e1

gnu: i3status-rust: Fix build.

* gnu/packages/rust-apps.scm (i3status-rust)[arguments]: Actually use
the requested OUTPUTS phase keywords instead of the obsolete %OUTPUTS.

Reported by vldn[m] on #guix.

patch browse .tar.gz .zip

1 files changed, 5 insertions(+), 3 deletions(-)

M gnu/packages/rust-apps.scm

M gnu/packages/rust-apps.scm => gnu/packages/rust-apps.scm +5 -3

@@ 575,12 575,14 @@ characters, ASCII whitespace characters, other ASCII characters and non-ASCII.")
              (setenv "RUSTC_BOOTSTRAP" "1")))
          (add-after 'unpack 'fix-resources-path
            (lambda* (#:key outputs #:allow-other-keys)
-             (let ((resources (string-append %output "/share")))
+             (let* ((out (assoc-ref outputs "out"))
+                    (share (string-append out "/share")))
                (substitute* "src/util.rs"
-                 (("/usr/share/i3status-rust") resources)))))
+                 (("/usr/share/i3status-rust") share)))))
          (add-after 'install 'install-resources
            (lambda* (#:key outputs #:allow-other-keys)
-             (copy-recursively "files" (string-append %output "/share"))))
+             (let ((out (assoc-ref outputs "out")))
+               (copy-recursively "files" (string-append out "/share")))))
          (add-after 'install 'wrap-i3status
            (lambda* (#:key outputs inputs #:allow-other-keys)
              (let ((out (assoc-ref outputs "out"))