~ruther/guix-local: gnu: wdiff: Use gexps.

ea1c9394642ee3dac3f51cbcc99af375c5a721db — Anderson Torres 2 months ago 805dd17

gnu: wdiff: Use gexps.

* gnu/packages/patchutils.scm(wdiff)[arguments]: Use gexps.

Change-Id: Ife2c051c209948afafe67854a315bdfa1a604f52
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Merges: #4774

patch browse .tar.gz

1 files changed, 14 insertions(+), 12 deletions(-)

M gnu/packages/patchutils.scm

M gnu/packages/patchutils.scm => gnu/packages/patchutils.scm +14 -12

@@ 534,20 534,22 @@ Users can login allowing them to change the state of patches.")
     (version "1.2.2")
     (source
      (origin
-      (method url-fetch)
-      (uri (string-append "mirror://gnu/wdiff/wdiff-"
-                          version ".tar.gz"))
-      (sha256
-       (base32
-        "0sxgg0ms5lhi4aqqvz1rj4s77yi9wymfm3l3gbjfd1qchy66kzrl"))))
+       (method url-fetch)
+       (uri (string-append "mirror://gnu/wdiff/wdiff-"
+                           version ".tar.gz"))
+       (sha256
+        (base32
+         "0sxgg0ms5lhi4aqqvz1rj4s77yi9wymfm3l3gbjfd1qchy66kzrl"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:phases (modify-phases %standard-phases
-                  (add-before 'check 'fix-sh
-                    (lambda _
-                      (substitute* "tests/testsuite"
-                        (("#! /bin/sh")
-                         (string-append "#!" (which "sh")))))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'check 'fix-testsuite
+            (lambda _
+              (substitute* "tests/testsuite"
+                (("#! /bin/sh")
+                 (string-append "#!" (which "sh")))))))))
     (native-inputs
      (list which
            ;; For some reason wdiff.info gets rebuilt.