more poetry inspiration, update contacts

2 files changed, 21 insertions, 20 deletions

diff --git a/src/operationnull/pages.scm b/src/operationnull/pages.scm
index 9bf9d5a..69554df 100644
--- a/src/operationnull/pages.scm
+++ b/src/operationnull/pages.scm
@@ -22,28 +22,30 @@
 			 (a (@ (href "https://github.com/plasma-umass/scalene"))
 			    "SCALENE")
 			 ".")))
-	    (h2 "Similar sites:")
+	    (h2 "Other sites and protocols:")
 	    (div (@ (class "c"))
 		 (p "The web is currently being overrun with AI generated content. Even before then, search engines prioritized commercial pages over personalized sites or blogs. I have come across three solutions:")
 		 (ol
-                     (li "webrings! The footer of this site contains links to the sites of my peers'.")
+                     (li "webrings! The footer of this site contains links to the sites of my peers.")
 		     (li (a (@ (href "https://wiby.me"))
 			    "wiby.me")
-			 ", a unique search engine which indexes only personal blogs. The all-knowing "
+			 " works as a search engine and indexes only personal blogs. The all-knowing "
 			 (a (@ (href "https://searxng.org/"))
 			    "searxng")
-			 " can be configured to index this engine while simultaneously accessing google or duckduckgo.")
+			 " can also be configured to index this engine while simultaneously accessing google or duckduckgo.")
 		     (li "try the "
 			 (a (@ (href "https://geminiprotocol.net/"))
 			    "gemini protocol")
 			 ", which is filled with interesting 'gemlogs'. I have started my own, named 'Porphyrion'.")))))
 
 (define contact-content
-  '(article (h2 "Matrix and IRC")
+  '(article (h2 "Messengers")
 	    (div (@ (class "c"))
-		 (b "IRC: ") "@ bdunahu @ libera.chat or @ Gondul @ libera.chat"
+		 (b "IRC: ") "@ bdunahu @ libera.chat"
 		 (br)
-		 (b "matrix: ") "@bdunahu:tchncs.de")
+		 (b "matrix: ") "@bdunahu:tchncs.de"
+                 (br)
+                 (b "signal: ") "bdunahu.29")
 	    (h2 "Email")
 	    (div (@ (class "c"))
 		 "bdunahu @ this domain"
@@ -54,31 +56,33 @@
 			 "Fingerprint: "
 			 (code "5550 5CA6 9DE5 D342 7F31  F9AE 5F86 6C65 2A34 C996"))))))
 
+(define about-content)
+
 (define e404
   '(article (h2 "403/404 Error")
             (div (@ (class "c"))
 		 (p "The requested page does not exist, or you do not have access."))))
 
 (define gold-content
-  '(article (h2 "More Worthless than Gold")
+  '(article (h2 "Shape God")
             (div (@ (class "date"))
-                    "Written on Feb 12, 2024 by bdunahu")
+                    "Written on Feb 12, 2024, updated June 30th, 2025 by bdunahu")
             (br)
             (div (p (@ (class "verse"))
-                    "Wilt beneath branches bent on ill-bound hope"
+                    "An abiding ash snares its feathered lord;"
                     (br)
-                    "our watchful wings cast petals of shadows,"
+                    "the first bears shelter, the second shadow."
                     (br)
-                    "the fervent embrace of triple-knot rope"
+                    "Darkness thrashes in envy, a callous cord;"
                     (br)
-                    "seldom slaughter those born of the gallows."
+                    "life seldom slaughters the serf of gallows."
                     (br)
                     (br)
                     "In sacred wellspring bearing a kingdom,"
                     (br)
                     "lowly ancients bargain poison and vice."
                     (br)
-                    "Our madman need savor his wisdom;"
+                    "A madman need savor his wisdom;"
                     (br)
                     "to take lore for sight is a witless price."
                     (br)
@@ -96,8 +100,5 @@
                     (br)
                     "In burst fetters terror comes to bite,"
                     (br)
-                    "and thus conclude the "
-                    (a (@ (href "https://norse-mythology.org/tales/odins-discovery-of-the-runes/"))
-		       "coward's futile plight")
-                    "."
-                    (br)))))
+                    "and thus conclude the coward's futile plight."
+		    (br)))))
diff --git a/src/operationnull/site.scm b/src/operationnull/site.scm
index 1fad264..53a36c0 100644
--- a/src/operationnull/site.scm
+++ b/src/operationnull/site.scm
@@ -22,5 +22,5 @@
         #:builders (list (static-page index-content "index.html" "home")
                          (static-page contact-content "/contact.html" "contact")
                          (static-page e404 "/404.html" "404 Error")
-                         (static-page gold-content "/gold.html" "More Worthless than Gold")
+                         (static-page gold-content "/gold.html" "Shape God")
                          (static-directory "content/assets" "assets"))))