general updates, add porphyrion link

1 files changed, 16 insertions, 14 deletions

diff --git a/src/operationnull/pages.scm b/src/operationnull/pages.scm
index 319199a..d317570 100644
--- a/src/operationnull/pages.scm
+++ b/src/operationnull/pages.scm
@@ -8,22 +8,23 @@
 (define index-content
   '(article (h2 "Welcome.")
             (p "My name is Benjamin. operationnull is my personal site.")
-            (p "My interests often revolve around processing and manipulating text--code generation, interpreters, Norse mythology, traditional sword and sorcery, and GNU Emacs, the ultimate text-based operating system. I graduated from CSU with a B.S. in computer science Spring 2024.")
-            (p "I've dabbled in poetry/fiction ("
-               (a (@ (href "/gold.html"))
-                  "example")
-               "), though I am still an amateur writer. I am working on another short sword and sorcery story (10,000+ words) about an outlandish werewolf named Gǫndul and her creator---the master-conjurer Gullveig. I am not sure if it will ever appear publicly or on this site.")
-            (p "A few of my personal projects can be found on my "
-               (a (@ (href "https://git.operationnull.com/"))
-                  "git server")
-               ", all of which are "
-               (a (@ (href "https://en.wikipedia.org/wiki/Free_software"))
-                  "libre")
-               ".")))
+            (p "My interests often revolve around processing and manipulating text--code generation, interpreters, Norse mythology, sword and sorcery, and GNU Emacs, the ultimate text-based operating system. I graduated from CSU with a B.S. in computer science Spring 2024.")
+            (ul (@ (type "bullet"))
+                (li "I have an interest in poetry/fiction though the quality of my work is up to your interpretation ("
+                   (a (@ (href "/gold.html"))
+                      "gold")
+                   ").")
+                (li "I am working on a short sword and sorcery story about a frankensteinish werewolf, and possibly, blood.")
+                (li "I am currently learning (guile) scheme, and using it to design a C compiler.")
+                (li "A few of my personal projects can be found on my "
+                    (a (@ (href "https://git.operationnull.com/"))
+                       "git server")
+                    ", all of which are libre.")
+                (li "I host a small gemlog on the link titled 'porphyrion'."))))
 
 (define contact-content
   '(article (h2 "Contact")
-            (p "Contact me about the content of this site here:")
+            (p "I am reachable by email:")
             (ul (@ (type "bullet"))
                 (li (b "email: ") "bdunahu @ this domain"))
             (ul (p (@ (style "font-size: 80%;"))
@@ -33,9 +34,10 @@
                     (br)
                     "Fingerprint: "
                     (code "5550 5CA6 9DE5 D342 7F31  F9AE 5F86 6C65 2A34 C996")))
-            (p "Additionally, these accounts are/belong to me.")
+            (p "Additionally, these accounts belong to me.")
             (ul (@ (type "bullet"))
                 (li (b "IRC: ") "@ Isaz @ libera.chat")
+                (i "And: ") "@ Gondul @ libera.chat"
                 (li (b "matrix: ") "@bdunahu:tchncs.de"))))
 
 (define e404