Recently Written · git

coleslaw

Emacs mode for the "Coleslaw" site generator written in Common Lisp.

git clone https://github.com/equwal/coleslaw

Log | Files | Refs


commit b5d5076aa88649baa2ce88cef825cb16e01a53bd
Shukry Zablah <shukryzablah@gmail.com>
2021-09-19 23:00:35 -0400

make sitemap subclass index, add to routing

 cli/cli.lisp         | 3 ++-
 plugins/sitemap.lisp | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/cli/cli.lisp b/cli/cli.lisp
index ab31512..e1e4216 100644
--- a/cli/cli.lisp
+++ b/cli/cli.lisp
@@ -29,7 +29,8 @@
            (:month-index    \"date/~~a\")
            (:numeric-index  \"~~d\")
            (:feed           \"~~a.xml\")
-           (:tag-feed       \"tag/~~a.xml\"))
+           (:tag-feed       \"tag/~~a.xml\")
+           (:sitemap        \"~~a.xml\"))
  :title \"Improved Means for Achieving Deteriorated Ends\" ;; a site title
  :theme \"hyde\"                        ;; to select one of the themes in \"coleslaw/themes/\"
  
diff --git a/plugins/sitemap.lisp b/plugins/sitemap.lisp
index ea4a0ea..a869c89 100644
--- a/plugins/sitemap.lisp
+++ b/plugins/sitemap.lisp
@@ -13,7 +13,7 @@
 
 (in-package :coleslaw-sitemap)
 
-(defclass sitemap ()
+(defclass sitemap (index)
   ((urls :initarg :urls :reader urls)))
 
 (defmethod page-url ((object sitemap)) "sitemap.xml")