aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArun Isaac2022-09-14 18:11:40 +0530
committerArun Isaac2022-09-15 19:54:28 +0530
commitf351e95b476ef2bd248cb79c286c5e119dab1e6a (patch)
tree5c536c5094fc4739e27e65d5923f6ba7807d63e7
parentc901f4ebc64a4ba55f9f8ec567468fd54fd63fbb (diff)
downloadgn-machines-f351e95b476ef2bd248cb79c286c5e119dab1e6a.tar.gz
Link to CD from the navigation menu.
* genenetwork-development.scm (laminar-template-gexp): Link to continuous deployment from the navigation menu.
-rw-r--r--genenetwork-development.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/genenetwork-development.scm b/genenetwork-development.scm
index 3e59160..52ecb1f 100644
--- a/genenetwork-development.scm
+++ b/genenetwork-development.scm
@@ -690,9 +690,10 @@ menu link to channels.scm and the issue tracker at ISSUE-TRACKER-URI."
(substitute* #$output
(("<router-link to=\"jobs\">Jobs</router-link>" jobs-link)
(string-append
- "<a href=\"/channels.scm\" target=\"_blank\">channels.scm</a>"
+ "<a href=\"https://cd.genenetwork.org\" target=\"_blank\">CD</a>"
jobs-link
- "<a href=\"" #$issue-tracker-uri "\" target=\"_blank\">Issues</a>"))))))
+ "<a href=\"" #$issue-tracker-uri "\" target=\"_blank\">Issues</a>"
+ "<a href=\"/channels.scm\" target=\"_blank\">channels.scm</a>"))))))
(define (install-laminar-template-gexp template)
"Return a G-expression that installs custom laminar TEMPLATE."