diff options
| -rw-r--r-- | website/www/donate.scm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/website/www/donate.scm b/website/www/donate.scm index ad3d41d..559fc24 100644 --- a/website/www/donate.scm +++ b/website/www/donate.scm @@ -24,6 +24,9 @@ #:use-module (www shared) #:export (donate-page)) +(define fsf + `(a (@ (href "https://www.fsf.org/")) "Free Software Foundation")) + (define (donate-page) `(html (@ (lang "en")) ,(html-page-header "Home") @@ -69,8 +72,7 @@ reality.") (th "donors"))) (tbody (tr (td "hydra.gnu.org") (td "build farm front-end") - (td (ul (li (a (@ (href "https://www.fsf.org/")) - "Free Software Foundation"))))) + (td (ul (li ,fsf)))) (tr (td "hydra.gnunet.org") (td "x86_64-linux, i686-linux") (td (ul (li (a (@ (href "https://gnunet.org/fsnsg")) @@ -97,8 +99,7 @@ München"))))) (li "Mark H. Weaver (hosting)")))) (tr (td "hydra-slave0") (td "mips64el-linux") - (td (ul (li (a (@ (href "https://www.fsf.org/")) - "Free Software Foundation"))))) + (td (ul (li ,fsf)))) (tr (td "guix.sjd.se") (td "x86_64-linux, i686-linux") (td (ul (li (a (@ (href |