diff mbox series

[bug#69432,guix-artwork,v2,1/3] website: Adjust style of web site builder.

Message ID 20240229214714.9431-1-ludo@gnu.org
State New
Headers show
Series [bug#69432,guix-artwork,v2,1/3] website: Adjust style of web site builder. | expand

Commit Message

Ludovic Courtès Feb. 29, 2024, 9:47 p.m. UTC 
* website/.guix.scm (lingua-web-site)[build]: Use ‘for-each’ and
‘install-file’ when copying font files.
---
 website/.guix.scm | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)


base-commit: b7ccc5cb1b4ec936c00dbd98376c5d2677e60a63
diff mbox series

Patch

diff --git a/website/.guix.scm b/website/.guix.scm
index 3d8fdb6..1d8c3e6 100644
--- a/website/.guix.scm
+++ b/website/.guix.scm
@@ -206,13 +206,13 @@ 
 
             ;; Include the Fira fonts used in
             ;; website/static/base/css/manual.css.
-            (mkdir-p (string-append #$output "/static/base/fonts"))
-            (map (lambda (file)
-                   (copy-file (string-append #+font-fira-sans
-                                             "/share/fonts/truetype/" file)
-                              (string-append #$output
-                                             "/static/base/fonts/" file)))
-                 '("FiraSans-Bold.ttf" "FiraSans-Regular.ttf"))))))
+            (for-each (lambda (file)
+                        (install-file (string-append #+font-fira-sans
+                                                     "/share/fonts/truetype/"
+                                                     file)
+                                      (string-append #$output
+                                                     "/static/base/fonts")))
+                      '("FiraSans-Bold.ttf" "FiraSans-Regular.ttf"))))))
 
   (computed-file (string-append "guix-web-site-" lingua)
                  build