15 lines
328 B
Raku
15 lines
328 B
Raku
use v6.e.PREVIEW;
|
|
|
|
use JSON::Class:auth<zef:vrurg>;
|
|
|
|
# Top level metadata for the blog
|
|
unit class BlogMeta is json(:pretty);
|
|
|
|
#| The title of the blog
|
|
has Str:D $.title is required is rw;
|
|
|
|
#| The tagline of the blog
|
|
has Str:D $.tagline is required is rw;
|
|
|
|
#| The id of the placeholder post
|
|
has Int:D $.placeholder-id is rw = 0;
|