thatonelutenist/website
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add header links to blog meta

Browse source
This commit is contained in:
Nathan McCarty 2025-03-15 14:28:22 -04:00
parent 79ee0d4c63
commit 0e87e752d2
3 changed files with 16 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
db/meta.json
View file

@ -1,6 +1,8 @@
{ {
"about-id": 2, "about-id": 2,
"base-url": "https://www.stranger.systems", "base-url": "https://www.stranger.systems",
"header-links": [
],
"placeholder-id": 0, "placeholder-id": 0,
"tagline": "Making software better by making it weird", "tagline": "Making software better by making it weird",
"title": "Stranger Systems" "title": "Stranger Systems"

4
lib/DB/BlogMeta.rakumod
View file

@ -1,6 +1,7 @@
use v6.e.PREVIEW; use v6.e.PREVIEW;
use JSON::Class:auth<zef:vrurg>; use JSON::Class:auth<zef:vrurg>;
use DB::HeaderLink;
# Top level metadata for the blog # Top level metadata for the blog
unit class BlogMeta is json(:pretty); unit class BlogMeta is json(:pretty);
@ -17,6 +18,9 @@ has Int:D $.placeholder-id is rw = 0;
#| The id of the about post #| The id of the about post
has Int:D $.about-id is rw = 0; has Int:D $.about-id is rw = 0;
#| Optional list of extra header links
has HeaderLink:D @.header-links is rw = [];
#| The base url of this post #| The base url of this post
has Str:D $.base-url is required; has Str:D $.base-url is required;

10
lib/DB/HeaderLink.rakumod Normal file
View file

@ -0,0 +1,10 @@
use v6.e.PREVIEW;
use JSON::Class:auth<zef:vrurg>;
# Additional header links
unit class HeaderLink is json(:pretty);
has Str:D $.link is required is rw;
has Str $.icon is rw;