@@ -285,10 +285,13 @@

       (for [[index item] (enumerated @history)]

         ^{:key index} [:li [input (item :input)] [output (item :output)]])]))

+(defn- link-to [href & content]

+    [:a {:href href} content])

+

 (def agpl-link

-    [:a

-     {:href "https://www.gnu.org/licenses/agpl-3.0.html"}

-     "GNU Affero Public License"])

+    (link-to

+     "https://www.gnu.org/licenses/agpl-3.0.html"

+     "GNU Affero Public License"))

 (defn footer []

   [:footer {:class (styles/footer)}