~ruther/guix-local: gnu: gimp-next: Use output references.

96ac18dfeb1a61bb57f3e26c9d62af3b5a231eef — Ricardo Wurmus 1 year, 3 months ago e019ea2

gnu: gimp-next: Use output references.

* gnu/packages/gimp.scm (gimp-next)[arguments]: Replace ASSOC-REF with direct
Gexp output references.

Change-Id: I876c7fc30936f81cd57945b0dd1fd3386839df3d

patch browse .tar.gz

1 files changed, 4 insertions(+), 6 deletions(-)

M gnu/packages/gimp.scm

M gnu/packages/gimp.scm => gnu/packages/gimp.scm +4 -6

@@ 451,12 451,10 @@ that is extensible via a plugin system.")
                      (substitute* "app/gimp-version.c"
                        (("CC_VERSION") (string-append "\"" cc-version "\""))))))
                (add-after 'install 'move-doc
-                 (lambda* (#:key outputs #:allow-other-keys)
-                   (let ((out (assoc-ref outputs "out"))
-                         (doc (assoc-ref outputs "doc")))
-                     (mkdir-p (string-append doc "/share"))
-                     (rename-file (string-append out "/share/doc")
-                                  (string-append doc "/share/doc"))))))))
+                 (lambda _
+                   (mkdir-p (string-append #$output:doc "/share"))
+                   (rename-file (string-append #$output "/share/doc")
+                                (string-append #$output:doc "/share/doc")))))))
     (inputs (modify-inputs (package-inputs gimp)
               (replace "gtk+" gtk+)
               (prepend libxmu libxt)