01/02: gnu: parallel: Update to 20220622.

[guix-commits]

efraim pushed a commit to branch master
in repository guix.

commit c8c444dbd27303b330ff3d8217b5ce162232e815
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Mon Jul 11 09:44:40 2022 +0300

    gnu: parallel: Update to 20220622.
    
    * gnu/packages/parallel.scm (parallel): Update to 20220622.
    [arguments]: Add phase to add parallel to the PATH.
---
 gnu/packages/parallel.scm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/parallel.scm b/gnu/packages/parallel.scm
index ec785cedf7..69b5c3eb0c 100644
--- a/gnu/packages/parallel.scm
+++ b/gnu/packages/parallel.scm
@@ -62,14 +62,14 @@
 (define-public parallel
   (package
     (name "parallel")
-    (version "20220522")
+    (version "20220622")
     (source
      (origin
       (method url-fetch)
       (uri (string-append "mirror://gnu/parallel/parallel-"
                           version ".tar.bz2"))
       (sha256
-       (base32 "07wczb3ra65xn8xar4lsfmdvqscbqk9n99r6vcxqzrk4v7w9aqxv"))))
+       (base32 "186mbzz5dn2ka8fqk9r8v8fpmh17clh2c6xln0czs81vynl1bgd4"))))
     (build-system gnu-build-system)
     (arguments
      `(#:phases
@@ -84,6 +84,10 @@
                   ;;  parent_shell($$) || $ENV{'SHELL'} || "/bin/sh";
                   (("/bin/sh\\\";\n$") (string-append (which "sh") "\";\n"))))
               (list "src/parallel" "src/sem"))))
+         (add-before 'install 'add-install-to-path
+           (lambda* (#:key outputs #:allow-other-keys)
+             (setenv "PATH" (string-append (getenv "PATH") ":"
+                                           (assoc-ref outputs "out") "/bin"))))
          (add-after 'install 'wrap-program
            (lambda* (#:key inputs outputs #:allow-other-keys)
              (let ((out (assoc-ref outputs "out")))