diff options
Diffstat (limited to 'src/operationnull/theme.scm')
| -rw-r--r-- | src/operationnull/theme.scm | 78 |
1 files changed, 41 insertions, 37 deletions
diff --git a/src/operationnull/theme.scm b/src/operationnull/theme.scm index 70e81e6..7a90a60 100644 --- a/src/operationnull/theme.scm +++ b/src/operationnull/theme.scm @@ -41,43 +41,47 @@ ,(stylesheet "site") ) (body - (intro - (br) - '(div (@ (class "container")) - (img (@ (alt "raven") (class "no-border") - (src "/assets/raven.png"))) - (h1 (span (@ (class "white")) bdunahu)) - (p "cs graduate student @ " - (a (@ (href "https://www.cics.umass.edu/")) - "UMass Amherst")))) - (nav - '(div (@ (class "container")) - (ul (li (a (@ (href "gemini://porphyrion.operationnull.com/")) - "porphyrion")) - (li (a (@ (href "https://git.operationnull.com/")) - "git")) - (li (a (@ (href "/contact.html")) - "contact")) - (li (a (@ (href "/")) - "home"))))) - ,body - (footer (@ (class "footer")) - "Copyright © 2025 bdunahu" - (br) - "Site content available under the " ,%cc-by-sa-link " license " - (a (@ (href "https://git.operationnull.com/operationnull.git/")) - "here") - "." - (br) - "Last updated on " - ,(date->string (current-date) "~b ~d, ~Y") - ". Generated with " - (a (@ (href "https://dthompson.us/projects/haunt.html")) - "Haunt") - " and " - (a (@ (href "https://gnu.org/software/guile")) - "Guile Scheme") - ".")))) + (div (@ (class "container")) + (intro + (div (@ (style "contain: size; justify-self: end;")) + (img (@ (alt "raven") (class "no-border") + (src "/assets/raven.png")))) + (div (@ (style "text-align: left;")) + (h1 (span (@ (class "white")) bdunahu)) + (p "cs graduate student @ " + (a (@ (href "https://www.cics.umass.edu/")) + "UMass Amherst")))) + (nav + (div + (ul (li (a (@ (href "gemini://porphyrion.operationnull.com/")) + "porphyrion")) + (li (a (@ (href "https://git.operationnull.com/")) + "git")) + (li (a (@ (href "/contact.html")) + "contact")) + (li (a (@ (href "/")) + "home"))))) + ,body + (footer (@ (class "footer")) + (script (@ (id "umaring_js") + (src "https://umaring.mkr.cx/ring.js?id=bdunahu"))) + (div (@ (id "umaring"))) + "Copyright © 2025 bdunahu" + (br) + "Site content available under the " ,%cc-by-sa-link " license " + (a (@ (href "https://git.operationnull.com/operationnull.git/")) + "here") + "." + (br) + "Last updated on " + ,(date->string (current-date) "~b ~d, ~Y") + ". Generated with " + (a (@ (href "https://dthompson.us/projects/haunt.html")) + "Haunt") + " and " + (a (@ (href "https://gnu.org/software/guile")) + "Guile Scheme") + "."))))) #:post-template (lambda (post) `((article |