Licensing information

5 files changed, 56 insertions, 6 deletions

diff --git a/jakob/reader/org-mode-prime.scm b/jakob/reader/org-mode-prime.scm
index 85c4296..8972ae5 100644
--- a/jakob/reader/org-mode-prime.scm
+++ b/jakob/reader/org-mode-prime.scm
@@ -32,6 +32,5 @@
   (make-reader (reader-matcher org-mode-reader)
                (lambda args
                  (let-values (((metadata sxml) (apply (reader-proc org-mode-reader) args)))
-                   (let* ((sxml (rewrite-absolute-urls-as-relative sxml))
-                          (sxml (flatten-section-headings sxml)))
+                   (let ((sxml (flatten-section-headings sxml)))
                      (values metadata sxml))))))
diff --git a/jakob/theme.scm b/jakob/theme.scm
index f2006fa..7e29aa2 100644
--- a/jakob/theme.scm
+++ b/jakob/theme.scm
@@ -202,4 +202,9 @@
                        `(,content)
                        content))
             ,@scripts)
-         ,%footer)))))
+         ,%footer
+         (a (@ (style "display: none")
+               (href "/pages/licensing.html")
+               (rel "jslicense")
+               (data-jslicense "1"))
+            "JavaScript license information"))))))
diff --git a/jakob/utils/org-mode.scm b/jakob/utils/org-mode.scm
index f5ac800..8da8b39 100644
--- a/jakob/utils/org-mode.scm
+++ b/jakob/utils/org-mode.scm
@@ -30,6 +30,7 @@
   #:use-module (ice-9 popen)
   #:use-module (ice-9 textual-ports)
   #:use-module (jakob utils)
+  #:use-module (jakob utils sxml)
   #:use-module (srfi srfi-1)
   #:use-module (srfi srfi-11)
   #:use-module (srfi srfi-19)
@@ -194,7 +195,8 @@ daemon. Assumes that FORM does not write to `standard-output'."
 ;;; Rewriting engine
 
 (define (rewrite-org-mode tree)
-  (define filters (list rewrite-code-blocks-as-figures
+  (define filters (list rewrite-absolute-urls-as-relative
+                        rewrite-code-blocks-as-figures
                         rewrite-table-of-contents))
   (fold (lambda (f value) (f value)) tree filters))
 
diff --git a/pages/about-site.org b/pages/about-site.org
index 55475f3..81b769d 100644
--- a/pages/about-site.org
+++ b/pages/about-site.org
@@ -8,3 +8,5 @@ The website is built using the [[https://dthompson.us/projects/haunt.html][Haunt
 I am not currently aware of any attempts to censor this website. Nonetheless, I maintain mirrors on [[http://jakobyallfrbd3herebyee7hug3hxs2ma6aflmmllk35d7dyiwp3adid.onion/][Tor]] and [[http://mtgqjdrqqpovyhx7tortulrnvakbptsi3w5yintmo6lqapdd3hnq.b32.i2p][I2P]] should you have difficulty accessing this website in your locality.
 
 I aim to be as transparent as possible about the use of [[https://en.wikipedia.org/wiki/Generative_artificial_intelligence][generative artificial intelligence]] on this website. Unless stated otherwise, all text and source code is written by myself.
+
+Licensing information for this website, including Javascript licenses, is available [[https://jakob.space/pages/licensing.html][here]].
diff --git a/pages/weblabels.sxml b/pages/licensing.sxml
index 9c2c4fc..8b4cd40 100644
--- a/pages/weblabels.sxml
+++ b/pages/licensing.sxml
@@ -19,9 +19,51 @@
 (use-modules (jakob theme)
              (jakob utils sxml))
 
-`((title . "JavaScript Web Labels")
+`((title . "License Information")
   (content
-   . ((h2 "JavaScript Web Labels")
+   . ((h2 "Licensing Information")
+      (p "Unless otherwise specified, the text and images on this site are free
+culture works available under the "
+         (a (@ (href "https://creativecommons.org/licenses/by-sa/4.0/"))
+            "Creative Commons Attribution Share-Alike 4.0 International")
+         " license.")
+      (p "You are free to:")
+      (ul
+       (li "Share — copy and redistribute the material in any medium or format for
+any purpose, even commercially.")
+       (li "Adapt — remix, transform, and build upon the material for any purpose,
+even commercially.")
+       (li "The licensor cannot revoke these freedoms as long as you follow the
+license terms."))
+      (p "Under the following terms:")
+      (ul
+       (li "Attribution — You must give appropriate credit, provide a link to the
+license, and indicate if changes were made. You may do so in any
+reasonable manner, but not in any way that suggests the licensor
+endorses you or your use.")
+       (li "ShareAlike — If you remix, transform, or build upon the material, you
+must distribute your contributions under the same license as the
+original.")
+       (li "No additional restrictions — You may not apply legal terms or
+technological measures that legally restrict others from doing anything
+the license permits."))
+      (p "Notices:")
+      (p "You do not have to comply with the license for elements of the material
+in the public domain or where your use is permitted by an applicable
+exception or limitation.")
+      (p "No warranties are given. The license may not give you all of the
+permissions necessary for your intended use. For example, other rights
+such as publicity, privacy, or moral rights may limit how you use the
+material.")
+      (hr)
+      (p "Fugue Icons by "
+         (a (@ (href "https://p.yusukekamiyamane.com/about/"))
+            "Yusuke Kamiyamane")
+         " are under the "
+         (a (@ (href "http://creativecommons.org/licenses/by/3.0/"))
+            "Creative Commons Attribution 3.0 License")
+         ".")
+      (h2 "JavaScript Web Labels")
       (table (@ (id "jslicense-labels1"))
              (tr (td ,(hyperlink "/static/js/dynamic-comment-form.js"
                                  `(p "/static/js/dynamic-comment-form.js")))