diff options
Diffstat (limited to 'gnu/packages/cran.scm')
-rw-r--r-- | gnu/packages/cran.scm | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm index 8d585f0970..5efc49f079 100644 --- a/gnu/packages/cran.scm +++ b/gnu/packages/cran.scm @@ -34,6 +34,7 @@ ;;; Copyright © 2020, 2021 Simon Tournier <[email protected]> ;;; Copyright © 2020 Aniket Patil <[email protected]> ;;; Copyright © 2021 Marcel Schilling <[email protected]> +;;; Copyright © 2021 Guillaume Le Vaillant <[email protected]> ;;; ;;; This file is part of GNU Guix. ;;; @@ -2171,17 +2172,17 @@ previewing themes in real time.") ;; replace them. (with-directory-excursion "inst/www/shared" (replace-file "strftime/strftime-min.js" - (string-append (assoc-ref inputs "js-strftime") - "/share/javascript/strftime.min.js")) + (search-input-file inputs + "/share/javascript/strftime.min.js")) (replace-file "highlight/highlight.pack.js" - (string-append (assoc-ref inputs "js-highlight") - "/share/javascript/highlight.min.js")) + (search-input-file inputs + "/share/javascript/highlight.min.js")) (replace-file "datatables/js/jquery.dataTables.min.js" - (string-append (assoc-ref inputs "js-datatables") - "/share/javascript/jquery.dataTables.min.js")) + (search-input-file inputs + "/share/javascript/jquery.dataTables.min.js")) (replace-file "selectize/js/selectize.min.js" - (string-append (assoc-ref inputs "js-selectize") - "/share/javascript/selectize.min.js")) + (search-input-file inputs + "/share/javascript/selectize.min.js")) (for-each (match-lambda ((source . target) (minify source #:target target))) @@ -2285,8 +2286,8 @@ responsive, and powerful applications with minimal effort.") (add-after 'unpack 'replace-minified-javascript (lambda* (#:key inputs #:allow-other-keys) (with-directory-excursion "inst/www/jsTree-3.3.7/" - (symlink (string-append (assoc-ref inputs "js-requirejs") - "/share/javascript/require.min.js") + (symlink (search-input-file inputs + "/share/javascript/require.min.js") "libs/require.js") (call-with-values (lambda () @@ -24967,9 +24968,8 @@ techniques to average Bayesian predictive distributions.") (lambda* (#:key inputs #:allow-other-keys) (setenv "TZ" "UTC+1") (setenv "TZDIR" - (string-append (assoc-ref inputs "tzdata") - "/share/zoneinfo")) - #t))))) + (search-input-directory inputs + "share/zoneinfo"))))))) (native-inputs `(("tzdata" ,tzdata-for-tests) ("pandoc" ,pandoc) |