~ruther/guix-local

4a2798e0672cb610313b8ea833b802adfe905c92 — Efraim Flashner 9 years ago 76e8566
gnu: freeimage: Use 'modify-phases' syntax.

* gnu/packages/image.scm (freeimage)[arguments]: Use 'modify-phases'
syntax.
1 files changed, 9 insertions(+), 9 deletions(-)

M gnu/packages/image.scm
M gnu/packages/image.scm => gnu/packages/image.scm +9 -9
@@ 585,15 585,15 @@ supplies a generic doubly-linked list and some string functions.")
                                     "freeimage-CVE-2016-5684.patch"))))
   (build-system gnu-build-system)
   (arguments
    '(#:phases (alist-delete
                'configure
                (alist-cons-before
                 'build 'patch-makefile
                 (lambda* (#:key outputs #:allow-other-keys)
                   (substitute* "Makefile.gnu"
                     (("/usr") (assoc-ref outputs "out"))
                     (("-o root -g root") "")))
                 %standard-phases))
    '(#:phases
      (modify-phases %standard-phases
        (delete 'configure)
        (add-before 'build 'patch-makefile
          (lambda* (#:key outputs #:allow-other-keys)
            (substitute* "Makefile.gnu"
              (("/usr") (assoc-ref outputs "out"))
              (("-o root -g root") ""))
            #t)))
      #:make-flags '("CC=gcc")
      #:tests? #f)) ; no check target
   (native-inputs