diff options
| author | bd <bdunahu@operationnull.com> | 2024-07-15 02:37:53 -0600 | 
|---|---|---|
| committer | bd <bdunahu@operationnull.com> | 2024-07-15 02:37:53 -0600 | 
| commit | 1dfd93961b10e32a79081864a9e8763809bc0352 (patch) | |
| tree | 6ea294aaee95b9bc6edc46f8a0dde6bdd4de912b | |
| parent | fc104353fbdcd592809f0e733de5844b5ade8f3d (diff) | |
Remove pages output directory, rename feed.xml to atom.xml
| -rw-r--r-- | src/operationnull/site.scm | 29 | ||||
| -rw-r--r-- | src/operationnull/theme.scm | 9 | 
2 files changed, 20 insertions, 18 deletions
| diff --git a/src/operationnull/site.scm b/src/operationnull/site.scm index 084bf1b..ad63b51 100644 --- a/src/operationnull/site.scm +++ b/src/operationnull/site.scm @@ -14,22 +14,23 @@  (define %blog-collection -  `(("Posts" "/posts/index.html" ,posts/reverse-chronological))) +  `(("Recent Posts" "/posts/index.html" ,posts/reverse-chronological)))  (define main-site    (site #:title "operationnull" -	#:domain "operationnull.com" -	#:posts-directory "content/posts" -	#:build-directory "target" -	#:default-metadata -	'((author . "bdunahu")) -	#:readers (list commonmark-reader) -	#:builders (list (static-page index-content "index.html" "home") -			 (static-page contact-content "pages/contact.html" "contact") -			 (blog #:theme main-theme +        #:domain "operationnull.com" +        #:posts-directory "content/posts" +        #:build-directory "target" +        #:default-metadata +        '((author . "bdunahu")) +        #:readers (list commonmark-reader) +        #:builders (list (static-page index-content "index.html" "home") +                         (static-page contact-content "/contact.html" "contact") +                         (blog #:theme main-theme                                 #:prefix "/posts/"                                 #:collections %blog-collection) -			 (static-page gold-content "pages/gold.html" "More Worthless than Gold") -			 (atom-feed) -			 (atom-feeds-by-tag) -			 (static-directory "content/assets" "assets")))) +                         (static-page gold-content "/gold.html" "More Worthless than Gold") +                         (atom-feed #:file-name "atom.xml" +                                    #:subtitle "Recent Posts") +                         ;; (atom-feeds-by-tag) +                         (static-directory "content/assets" "assets")))) diff --git a/src/operationnull/theme.scm b/src/operationnull/theme.scm index 3129203..1d0b144 100644 --- a/src/operationnull/theme.scm +++ b/src/operationnull/theme.scm @@ -41,11 +41,12 @@                (link (@ (rel "alternate")                         (type "application/atom+xml")                         (title "Atom feed") -                       (href "/feed.xml"))) +                       (href "/atom.xml")))                ,(stylesheet "site")                )               (body                (intro +               (br)                 '(div (@ (class "container"))                       (img (@ (alt "raven") (class "no-border")                               (src "/assets/raven.png"))) @@ -57,10 +58,10 @@                 '(div (@ (class "container"))                       (ul (li (a (@ (href "https://git.operationnull.com/"))                                  "git")) -                         (li (a (@ (href "/pages/contact.html")) +                         (li (a (@ (href "/contact.html"))                                  "contact"))                           (li (a (@ (href "/posts/")) -                                "rand")) +                                "blog"))                           (li (a (@ (href "/"))                                  "home")))))                ,body @@ -96,7 +97,7 @@               (string-append prefix "/" (site-post-slug site post) ".html"))             `(article (h2 ,title -                         (a (@ (href "/feed.xml")) +                         (a (@ (href "/atom.xml"))                              (img (@ (class "feed-icon") (src "/assets/feed.png")))))                       ,(map (lambda (post)                               (let ((uri (post-uri post))) | 
