From aac5496a16a65e1206877281ffe8fd81212b0049 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Mon, 11 Aug 2014 21:57:02 -0400
Subject: Add copyright and licensing information to page footer.

---
 guix-web/view.scm | 19 ++++++++++++++++---
 1 file changed, 16 insertions(+), 3 deletions(-)

diff --git a/guix-web/view.scm b/guix-web/view.scm
index 1d7f116..17d10a8 100644
--- a/guix-web/view.scm
+++ b/guix-web/view.scm
@@ -52,9 +52,22 @@
           ,@body
           (footer
            (small
-            (a (@ (href "/librejs")
-                  (rel "jslicense"))
-               "JavaScript license information")))))))
+            ;; FIXME: Figure out why copyright character doesn't
+            ;; render properly.
+            (p "Copyright (C) 2014 Guix-web contributors")
+            (p "Guix-web is licensed under the "
+               (a (@ (href "http://www.gnu.org/licenses/agpl-3.0.html"))
+                  "GNU Affero General Public License (AGPL)")
+               " - "
+               (a (@ (href "https://getbootstrap.com"))
+                  "Bootstrap CSS")
+               " is licensed under the "
+               (a (@ (href "https://directory.fsf.org/wiki/License:Apache2.0"))
+                  "Apache 2.0 license")
+               " - "
+               (a (@ (href "/librejs")
+                     (rel "jslicense"))
+                  "JavaScript license information"))))))))
 
 (define (license->json license)
   (json
-- 
cgit v1.2.3