Add palceholder post and update db init

This commit is contained in:
Nathan McCarty 2025-01-22 21:26:25 -05:00
parent a8e3b30668
commit fc04245162
3 changed files with 56 additions and 4 deletions

5
blog
View file

@ -2,6 +2,7 @@
use v6.e.PREVIEW;
use DB;
use DB::BlogMeta;
use DB::MarkdownPost;
my %*SUB-MAIN-OPTS =
@ -45,9 +46,9 @@ multi MAIN(
print "Tagline: ";
my $tagline = get;
my $meta = DB::BlogMeta.new: title => $title, tagline => $tagline;
my $meta = BlogMeta.new: title => $title, tagline => $tagline;
my $db = DB::PostDB.new: meta => $meta;
my $db = DB::PostDB.init: $meta;
if $force {
$db-file.spurt: $db.to-json, :create-only;