[bug#30390] [PATCH 2/3] gnu: libuv: Update to 1.19.1.

[Arun Isaac]

* gnu/packages/libevent.scm (libuv): Update to 1.19.1.
[arguments]: Use modify-phases.
---
 gnu/packages/libevent.scm | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/gnu/packages/libevent.scm b/gnu/packages/libevent.scm
index b613bf138..34b23d537 100644
--- a/gnu/packages/libevent.scm
+++ b/gnu/packages/libevent.scm
@@ -121,24 +121,24 @@ limited support for fork events.")
 (define-public libuv
   (package
     (name "libuv")
-    (version "1.14.1")
+    (version "1.19.1")
     (source (origin
               (method url-fetch)
               (uri (string-append "https://dist.libuv.org/dist/v"; version
                                   "/libuv-v" version ".tar.gz"))
               (sha256
                (base32
-                "08kx4mzjsdv90n9pivqxqjxlxk5vaf9p33zzvx661dwfmp9468pk"))))
+                "0y78029vhfhjwpbwg9c0p8ih8489azpfa9sjnzj2bksf6r29kv9j"))))
     (build-system gnu-build-system)
     (arguments
-     '(#:phases (alist-cons-after
-                 'unpack 'autogen
-                 (lambda _
-                   ;; Fashionable people don't run 'make dist' these days, so
-                   ;; we need to do that ourselves.
-                   (zero? (system* "sh" "autogen.sh")))
-                 %standard-phases)
-
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-before 'configure 'autogen
+           (lambda _
+             ;; Fashionable people don't run 'make dist' these days, so
+             ;; we need to do that ourselves.
+             (invoke "./autogen.sh")
+             #t)))
        ;; XXX: Some tests want /dev/tty, attempt to make connections, etc.
        #:tests? #f))
     (native-inputs `(("autoconf" ,(autoconf-wrapper))
-- 
2.15.1