Special post handling

db/posts/0.json

@@ -7,6 +7,7 @@
   "slugs": [
   ],
   "source": "/dev/null",
+  "special": false,
   "tags": [
   ]
 }

db/posts/1.json

@@ -7,6 +7,7 @@
   "slugs": [
   ],
   "source": "/home/nathan/Projects/Blog/projects/Markdown/MyNewBlog.md",
+  "special": false,
   "tags": [
     "meta",
     "raku"

db/posts/2.json

@@ -7,6 +7,7 @@
   "slugs": [
   ],
   "source": "/home/nathan/Projects/Blog/projects/Markdown/About.md",
+  "special": false,
   "tags": [
   ]
 }

db/posts/3.json

@@ -7,6 +7,7 @@
   "slugs": [
   ],
   "source": "/home/nathan/Projects/Blog/projects/Markdown/CryptoSuite.md",
+  "special": false,
   "tags": [
     "cryptography"
   ]

db/posts/4.json

@@ -7,6 +7,7 @@
   "slugs": [
   ],
   "source": "/home/nathan/Projects/Blog/projects/Markdown/2025/01-Jan/AdventOfBugs.md",
+  "special": false,
   "tags": [
     "idris",
     "advent-of-code"

db/posts/5.json

@@ -11,6 +11,7 @@
   ],
   "source": "/home/nathan/Projects/Blog/projects/Idris/src/LessMacrosMoreTypes/Printf.md",
   "source-code": "https://git.stranger.systems/thatonelutenist/website/src/branch/trunk/projects/Idris/src/LessMacrosMoreTypes/Printf.md",
+  "special": false,
   "tags": [
     "idris"
   ]

db/posts/6.json

@@ -7,6 +7,7 @@
   "slugs": [
   ],
   "source": "/home/nathan/Projects/Blog/projects/Markdown/HireMe.md",
+  "special": true,
   "tags": [
   ]
-}
+}

lib/Config.rakumod

@@ -51,10 +51,20 @@ initComments(\{
     body [
        site-header $meta;
        article :class<post>, [
-          post-header $id, $post, $db;
+          # Only generate the post header if the post isn't special
-          div :class<post-body>, [
+          optl !$post.special, -> {post-header $id, $post, $db};
-              $content;
+          # If the post is special, wrap it in a special div
-          ];
+          do if $post.special {
+              div :class<special-post>, [
+                  div :class<post-body>, [
+                      $content;
+                  ];
+              ];
+          } else {
+              div :class<post-body>, [
+                  $content;
+              ];
+          }
        ];
        # Only actually have the comment section if the post isn't hidden
        optl !$post.hidden, -> {div :id<comment-section>, :class<comments>};

lib/DB/Post.rakumod

@@ -43,6 +43,8 @@ has Str:D @.tags is rw is json = [];
 has Bool:D $.hidden is json is rw = False;
 #| An optional link to the source code for the post
 has Str $.source-code is rw is json;
+#| Special posts follow different rendering rules
+has Bool:D $.special is json is rw = False;
 
 #| Get the title for this post, intended to be extracted from whatever
 #| document produced it