;;; -*- scheme -*-

;;; Copyright © 2019 - 2023 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)
             (srfi srfi-1)
             (srfi srfi-19))

`((title . "About")
  (content
   . ((ul (@ (class "horizontal-list"))
          (li "Email: " (strong "zerodaysfordays at ‌​‌‌‌​‌‌‍‌​‌‌​​​​‍‌​‌‌​​​‌‍‌‌​‌‌​​​‍‌​‌​‌​‌‌‍‌‌​‌‌‌‌‌‍‌​‌‌‌​​‌‍‌​‌​‌​‌​‍‌​‌‌‌‌​​‍‌​‌‌​‌​​‍‌​‌‌​‌‌​‍‌​‌‌​​​‌‍‌​‌‌‌​​​‍‌‌​‌‌‌‌‌‍‌​‌​‌‌​​‍‌​‌​‌‌‌‌‍‌​‌‌‌‌‌​‍‌​‌‌​​‌​‍‌‌​‌‌‌‌‌‍‌​‌‌​​‌​‍‌​‌‌‌​‌​sdf.org"))
          (li "XMPP¹: " (strong "jakob at ‌​‌‌‌​‌‌‍‌​‌‌​​​​‍‌​‌‌​​​‌‍‌‌​‌‌​​​‍‌​‌​‌​‌‌‍‌‌​‌‌‌‌‌‍‌​‌‌‌​​‌‍‌​‌​‌​‌​‍‌​‌‌‌‌​​‍‌​‌‌​‌​​‍‌​‌‌​‌‌​‍‌​‌‌​​​‌‍‌​‌‌‌​​​‍‌‌​‌‌‌‌‌‍‌​‌​‌‌​​‍‌​‌​‌‌‌‌‍‌​‌‌‌‌‌​‍‌​‌‌​​‌​‍‌‌​‌‌‌‌‌‍‌​‌‌​​‌​‍‌​‌‌‌​‌​xmpp.is"))
          (li "IRC: " (strong "tsarfox on irc.libera.chat.")))
      (ul (@ (class "horizontal-list"))
          (li "GPG: " ,(hyperlink "/static/gpg.txt" "6581 A4FC 404F 6434 AEA3  008C 45ED 4DC3 05BA DA33")))
      (ul (@ (class "horizontal-list"))
          (li ,(hyperlink "https://git.sr.ht/~jakob" "git"))
          (li ,(hyperlink "https://social.jakob.space/jakob" "fedi"))
          (li ,(hyperlink "https://en.wikipedia.org/wiki/User:ZeroDaysForDays" "wiki"))
          (li ,(hyperlink "https://lobste.rs/u/jakob" "lobste.rs")))
      (main (@ (class "overline"))
            (div (@ (class "portrait"))
                 ,(image "portrait.png" "A portrait of myself, done by @scolastiko on Twitter."))
            (p "My name's Jakob, and I'm a self-taught "
               ,(hyperlink "https://www.gnu.org/philosophy/free-sw.html" "free software")
               ,(hyperlink "https://en.wikipedia.org/wiki/Hacker_culture#Definition" " hacker")
               ". I'm into computer security, software verification, functional programming, and lifting
weights.")
            (p "That's the short version. I have a longer biography available "
               ,(hyperlink "/pages/about-complete.html" "here") ", "
               "and a page describing "
               ,(hyperlink "https://nownownow.com/about" "what I'm focused on at this point in my life")
               " available "
               ,(hyperlink "/pages/now.html" "here") ".")
            (p "If you've sent an email to an address of mine
ending in 'sdf.lonestar.org' between January 2nd, 2020 and now, I have not
received it. SDF has discontinued mail service on that domain. Accordingly, "
               ,(hyperlink "https://paste.sr.ht/%7Ejakob/18c048600c26d125d6d743e6d5b44db852573242" "I have a new PGP key."))
            (p "To the best of my knowledge, access to this website is not being blocked by any
foreign government. Should this change, I maintain mirrors on "
               ,(hyperlink "http://jakobyallfrbd3herebyee7hug3hxs2ma6aflmmllk35d7dyiwp3adid.onion/" "Tor")
               " and "
               ,(hyperlink "http://mtgqjdrqqpovyhx7tortulrnvakbptsi3w5yintmo6lqapdd3hnq.b32.i2p" "i2p")
               ".")
            (p "1: I'll just ask that you reach out to me through other channels before
sending me an invitation on Jabber. My address ended up on the XSender list, so I
have a script to block messages from anyone not on my roster.")))))