;; SPDX-License-Identifier: CC-BY-SA-4.0
;; Copyright 2026 bdunahu <bdunahu@operationnull.com>
(define-module (operationnull pages)
  #:use-module (operationnull utils)
  #:export (e404
            recommend-content))

(define recommend-content
  '(article (h1 "Cool Stuff in Categories")
            (p "Things I use and recommend.")
            (h2 "Books & Series")
            (div (@ (class "c"))
                 (ul (li "Bram Stoker - Dracula")
                     (li "Christopher Tolkien - The Saga of King Heidrek the Wise")
                     (li "James Enge - Morlock Ambrosius Series")
                     (li "John Bellairs - The Face in the Frost")
                     (li "M.D. Lachlan - The Wolfsangel Cycle")
                     (li "Michael Moorcock - Elric Saga")
                     (li "Poul Anderson - Operation Chaos")
                     (li "Robert E. Howard - The God in the Bowl")
                     (li "Roger Zelazny - Jack of Shadows")
                     (li "Sam Sykes - Bring Down Heaven")
                     ;; (li "Stephen King - The Shining")
                     ))
            (h2 "Music")
            (div (@ (class "c"))
                 (ul                    ;
                  (li "Blind Guardian - Fly")
                  (li "Catamenia - Coldbound")
                  (li "Dool - Oweynagat")
                  (li "Empyrium - The Franconian Woods In Winter's Silence")
                  ;; (li "Enshine - Dual Existance")
                  (li "Eternal Tears of Sorrow - The River Flows Frozen")
                  (li "Evanescence - Imaginary")
                  (li "Lunatic Soul - Monsters")
                  (li "Palmreader - Hold/Release")
                  ;; (li "Osi and the Jupiter - Much Wisdom is Such Grief")
                  (li "Suldusk - Anthesis")
                  ;; (li "TOOL - Rosetta Stoned")
                  (li "Vylet Pony - The Wallflower Equation")))
            (h2 "Software")
            (div (@ (class "c"))
                 (ul (li "emacs")
                     (li "gimp")
                     (li "gnus (mail client)")
                     (li "guix")
                     (li "mpv (media player)")
                     (li "nsxiv (image viewer)")
                     (li "rcirc (irc client)")
                     (li "tor")
                     (li "yt-dlp")
                     (li "zathura (pdf viewer)")))
            (h2 "Favorite LLM Client?")
            (div (@ (class "c"))
                 (p "no. no no no no"))))

(define e404
  '(article (h1 "403/404 Error")
            (div (@ (class "c"))
                 (p "The requested page does not exist, or you do not have
access."))))