[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: website: Honor 'GUIX_WEB_SITE_ROOT_PATH' environment variable.
|
From: |
Ludovic Courtès |
|
Subject: |
01/01: website: Honor 'GUIX_WEB_SITE_ROOT_PATH' environment variable. |
|
Date: |
Wed, 25 Sep 2019 11:14:53 -0400 (EDT) |
civodul pushed a commit to branch master
in repository guix-artwork.
commit 0d627303680ef21efd63fba0728e39afc08d67eb
Author: Ludovic Courtès <address@hidden>
Date: Wed Sep 25 17:14:30 2019 +0200
website: Honor 'GUIX_WEB_SITE_ROOT_PATH' environment variable.
* website/apps/base/utils.scm (guix-root-url-path): Honor
'GUIX_WEB_SITE_ROOT_PATH'.
---
website/apps/base/utils.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/website/apps/base/utils.scm b/website/apps/base/utils.scm
index d57ec7c..c18eb89 100644
--- a/website/apps/base/utils.scm
+++ b/website/apps/base/utils.scm
@@ -46,7 +46,8 @@
(define guix-irc-log-url "http://logs.guix.gnu.org/guix";)
(define guix-root-url-path
- (make-parameter "/")) ; Path to GNU Guix site at guix.gnu.org
+ ;; Path to GNU Guix site at guix.gnu.org.
+ (make-parameter (or (getenv "GUIX_WEB_SITE_ROOT_PATH") "/")))
(define latest-guix-version
(make-parameter "1.0.1"))