aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2023-12-15 10:09:26 +0100
committerRicardo Wurmus <rekado@elephly.net>2023-12-15 16:13:07 +0100
commit888139880337cac798804779544128816df3617d (patch)
treea296256ca2306b06bf4f62c6a1ced461b276e1d6
parentb55d0a4abf82bd209a3665bced25f80740821446 (diff)
downloadguix-888139880337cac798804779544128816df3617d.tar.gz
guix-888139880337cac798804779544128816df3617d.zip
gnu: r-bookdown: Update to 0.37.
* gnu/packages/cran.scm (r-bookdown): Update to 0.37. [arguments]: Use minify-build-system to process JavaScript. Change-Id: I53ff5ef1527976e40e7caf8b34f77af7eb3e833f
-rw-r--r--gnu/packages/cran.scm40
1 files changed, 18 insertions, 22 deletions
diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm
index afa3687d46..a89c961f69 100644
--- a/gnu/packages/cran.scm
+++ b/gnu/packages/cran.scm
@@ -23308,13 +23308,13 @@ SELECT or UPDATE queries to an end-point.")
(define-public r-bookdown
(package
(name "r-bookdown")
- (version "0.36")
+ (version "0.37")
(source (origin
(method url-fetch)
(uri (cran-uri "bookdown" version))
(sha256
(base32
- "0c4pj5sg4cnz2b2kpxgr0wk1n1pf7wkn1npm76aghy4yxj29cj4y"))
+ "18j8ylaq5wnw1c0lif9a002kbymv04pd0i43ahmqkskkv1b13hdk"))
;; TODO: there is one more file to replace:
;; inst/resources/gitbook/js/app.min.js
(snippet
@@ -23330,32 +23330,28 @@ SELECT or UPDATE queries to an end-point.")
(build-system r-build-system)
(arguments
(list
- #:modules '((guix build utils)
- (guix build r-build-system)
- (srfi srfi-1))
+ #:modules '((guix build r-build-system)
+ (guix build minify-build-system)
+ (guix build utils)
+ (ice-9 match))
+ #:imported-modules `(,@%r-build-system-modules
+ (guix build minify-build-system))
#:phases
- #~(modify-phases %standard-phases
+ #~(modify-phases (@ (guix build r-build-system) %standard-phases)
(add-after 'unpack 'process-javascript
(lambda* (#:key inputs #:allow-other-keys)
(with-directory-excursion "inst/resources"
(invoke "tar" "-xf" (assoc-ref inputs "js-mathquill")
"-C" "/tmp" "--strip-components=2")
- (call-with-values
- (lambda ()
- (unzip2
- `((,(search-input-file inputs "/dist/clipboard.js")
- "gitbook/js/clipboard.min.js")
- (,(search-input-file inputs "/lunr.js")
- "gitbook/js/lunr.js")
- ("/tmp/mathquill.js"
- "mathquill/mathquill.min.js"))))
- (lambda (sources targets)
- (for-each (lambda (source target)
- (format #true "Processing ~a --> ~a~%"
- source target)
- (invoke "esbuild" source "--minify"
- (string-append "--outfile=" target)))
- sources targets)))))))))
+ (for-each (match-lambda
+ ((source . target)
+ (minify source #:target target)))
+ `((,(search-input-file inputs "/dist/clipboard.js")
+ . "gitbook/js/clipboard.min.js")
+ (,(search-input-file inputs "/lunr.js")
+ . "gitbook/js/lunr.js")
+ ("/tmp/mathquill.js"
+ . "mathquill/mathquill.min.js")))))))))
(propagated-inputs
(list r-htmltools
r-jquerylib