03/03: build: Update uglifyjs for minify-build-system.

[guix-commits]

efraim pushed a commit to branch master
in repository guix.

commit 385c485c651c0b1a467bdbbf31fa723dc4cabd9e
Author: Charles <charles.b.jackson@protonmail.com>
AuthorDate: Mon Jul 12 22:50:44 2021 -0500

    build: Update uglifyjs for minify-build-system.
    
    * guix/build-system/minify.scm (default-uglify-js): Update uglifyjs package 
used.
    * guix/build/minify-build-system.scm (minify): Use updated uglifyjs command 
name.
    
    Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
---
 guix/build-system/minify.scm       | 4 ++--
 guix/build/minify-build-system.scm | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/guix/build-system/minify.scm b/guix/build-system/minify.scm
index 28a6781..9d53760 100644
--- a/guix/build-system/minify.scm
+++ b/guix/build-system/minify.scm
@@ -44,8 +44,8 @@
 (define (default-uglify-js)
   "Return the default package to minify JavaScript source files."
   ;; Lazily resolve the binding to avoid a circular dependency.
-  (let ((mod (resolve-interface '(gnu packages lisp-xyz))))
-    (module-ref mod 'uglify-js)))
+  (let ((mod (resolve-interface '(gnu packages uglifyjs))))
+    (module-ref mod 'uglifyjs)))
 
 (define* (lower name
                 #:key source inputs native-inputs outputs system
diff --git a/guix/build/minify-build-system.scm 
b/guix/build/minify-build-system.scm
index 92158a0..c5a8767 100644
--- a/guix/build/minify-build-system.scm
+++ b/guix/build/minify-build-system.scm
@@ -39,7 +39,7 @@
   (format #t "minifying ~a\n" file)
   (let* ((base (basename file ".js"))
          (installed (or target (string-append directory base ".min.js")))
-         (minified (open-pipe* OPEN_READ "uglify-js" file)))
+         (minified (open-pipe* OPEN_READ "uglifyjs" file)))
     (call-with-output-file installed
       (cut dump-port minified <>))
     #t))