summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson@vistahigherlearning.com>2019-06-05 07:50:44 -0400
committerDavid Thompson <dthompson@vistahigherlearning.com>2019-06-05 13:52:34 -0400
commit896518696a90aaf0bda842b72e9ee775a494b489 (patch)
tree520d18c1aa070bbdf678973526b8e7128f67c84d
parent228c44724bca054266d83dd10baee62281c6e09b (diff)
Show git:// clone URLS on project pages since https:// is broken.
-rw-r--r--haunt.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/haunt.scm b/haunt.scm
index a3f3aa2..1ef3ae4 100644
--- a/haunt.scm
+++ b/haunt.scm
@@ -265,12 +265,13 @@ make install")))
(h2 "License")
(p ,license)
(h2 "Source Code")
- ,@(let ((url (string-append "https://git.dthompson.us/" repo ".git")))
+ ,@(let ((web-url (string-append "https://git.dthompson.us/" repo ".git"))
+ (clone-url (string-append "git://dthompson.us/" repo ".git")))
`((p ,name " is developed using the Git version control
system. The official repository is hosted at "
- ,(anchor url url))
+ ,(anchor web-url web-url))
(h3 "Anonymous clone")
- (pre "git clone " ,url)))
+ (pre "git clone " ,clone-url)))
(h2 "Community")
(p "Real-time discussion for " ,name " can be found on the "
(code "#guile")