[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#50515] [PATCH v3 1/2] website: Tweak 'GUIX_WEB_SITE_LOCAL'.
From: |
zimoun |
Subject: |
[bug#50515] [PATCH v3 1/2] website: Tweak 'GUIX_WEB_SITE_LOCAL'. |
Date: |
Thu, 21 Oct 2021 11:41:37 +0200 |
* website/apps/packages/data.scm (%package-list): Compare to 'yes' instead of
any value.
* website/README: Document it.
---
website/README | 8 ++++++++
website/apps/packages/data.scm | 3 ++-
2 files changed, 10 insertions(+), 1 deletion(-)
diff --git a/website/README b/website/README
index ce2819f..bc623c5 100644
--- a/website/README
+++ b/website/README
@@ -37,6 +37,14 @@ commands:
-- haunt build
#+end_example
+Any other value than =GUIX_WEB_SITE_LOCAL=yes= will build the full website
+considering all the packages and not a small subset. Note that the final
+website is built using the following command:
+
+#+begin_example
+ guix build -f .guix.scm
+#+end_example
+
** Serve locally
#+begin_example
LANG=en_US.UTF-8 guix environment -CN -m manifest.scm \
diff --git a/website/apps/packages/data.scm b/website/apps/packages/data.scm
index d1bbc92..eb34d26 100644
--- a/website/apps/packages/data.scm
+++ b/website/apps/packages/data.scm
@@ -50,7 +50,8 @@
(string<? (package-name p1)
(package-name p2))))))
(cond ((null? packages) '())
- ((getenv "GUIX_WEB_SITE_LOCAL") (list-head packages 300))
+ ((string=? "yes" (getenv "GUIX_WEB_SITE_LOCAL"))
+ (list-head packages 300))
(else packages)))))
(define (all-packages)
base-commit: 8b85fe7dd0bb000105f2bcd4955a7d2c6cd84298
--
2.29.2
- [bug#50515] [PATCH v3 1/2] website: Tweak 'GUIX_WEB_SITE_LOCAL'.,
zimoun <=