;;; -*- scheme -*-

;;; Copyright © 2019 - 2020 Jakob L. Kreuze <zerodaysfordays@sdf.org>
;;;
;;; This program is free software; you can redistribute it and/or
;;; modify it under the terms of the GNU General Public License as
;;; published by the Free Software Foundation; either version 3 of the
;;; License, or (at your option) any later version.
;;;
;;; This program is distributed in the hope that it will be useful,
;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
;;; General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with this program. If not, see
;;; <http://www.gnu.org/licenses/>.

(use-modules (jakob theme)
             (jakob utils sxml))

(theme
 #:title "JavaScript Web Labels"
 #:content
 `((h2 "JavaScript Web Labels")
   (table (@ (id "jslicense-labels1"))
          (tr (td ,(hyperlink "/static/js/dynamic-comment-form.js"
                              `(p "/static/js/dynamic-comment-form.js")))
              (td ,(hyperlink "http://www.gnu.org/licenses/gpl-3.0.html"
                              `(p "GNU General Public License 3.0 or later")))
              (td ,(hyperlink "/static/js/dynamic-comment-form.js"
                              `(p "/static/js/dynamic-comment-form.js"))))
          (tr (td ,(hyperlink "/static/js/proof-of-work.js"
                              `(p "/static/js/proof-of-work.js")))
              (td ,(hyperlink "http://www.gnu.org/licenses/gpl-3.0.html"
                              `(p "GNU General Public License 3.0 or later")))
              (td ,(hyperlink "/static/js/proof-of-work.js"
                              `(p "/static/js/proof-of-work.js"))))
          (tr (td ,(hyperlink "/static/js/webmention.js"
                              `(p "/static/js/webmention.js")))
              (td ,(hyperlink "http://www.gnu.org/licenses/gpl-3.0.html"
                              `(p "GNU General Public License 3.0 or later")))
              (td ,(hyperlink "/static/js/webmention.js"
                              `(p "/static/js/webmention.js"))))
          (tr (td ,(hyperlink "/static/js/section-folds.js"
                              `(p "/static/js/section-folds.js")))
              (td ,(hyperlink "http://www.gnu.org/licenses/gpl-3.0.html"
                              `(p "GNU General Public License 3.0 or later")))
              (td ,(hyperlink "/static/js/section-folds.js"
                              `(p "/static/js/section-folds.js"))))
          (tr (td ,(hyperlink "/static/js/rsvp.js"
                              `(p "/static/js/rsvp.js")))
              (td ,(hyperlink "http://www.gnu.org/licenses/gpl-3.0.html"
                              `(p "GNU General Public License 3.0 or later")))
              (td ,(hyperlink "/static/js/rsvp.js"
                              `(p "/static/js/rsvp.js"))))
          (tr (td ,(hyperlink "/static/js/gallery.js"
                              `(p "/static/js/gallery.js")))
              (td ,(hyperlink "http://www.gnu.org/licenses/gpl-3.0.html"
                              `(p "GNU General Public License 3.0 or later")))
              (td ,(hyperlink "/static/js/gallery.js"
                              `(p "/static/js/gallery.js"))))
          (tr (td ,(hyperlink "/static/js/oneko.js"
                              `(p "/static/js/oneko.js")))
              (td ,(hyperlink "http://www.jclark.com/xml/copying.txt"
                              `(p "Expat License")))
              (td ,(hyperlink "/static/js/oneko.js"
                              `(p "/static/js/oneko.js")))))))