use database directory instead of database file
This commit is contained in:
parent
fc04245162
commit
3b0e34e66e
7 changed files with 80 additions and 51 deletions
|
@ -3,8 +3,13 @@ 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
|
||||
unit class BlogMeta is json(:pretty);
|
||||
|
||||
#| The title of the blog
|
||||
has Str:D $.title is required is rw;
|
||||
|
||||
has Str:D $.title is required;
|
||||
#| The tagline of the blog
|
||||
has Str:D $.tagline is required;
|
||||
has Str:D $.tagline is required is rw;
|
||||
|
||||
#| The id of the placeholder post
|
||||
has Int:D $.placeholder-id is rw = 0;
|
||||
|
|
|
@ -7,7 +7,7 @@ use DB::Post;
|
|||
|
||||
#| A literate, markdown, idris post
|
||||
|
||||
unit class IdrisPost does Post is json;
|
||||
unit class IdrisPost does Post is json(:pretty);
|
||||
|
||||
#| Marker for disambiguation between post types in json representation, the
|
||||
#| cheaty way
|
||||
|
|
|
@ -6,7 +6,7 @@ use JSON::Class:auth<zef:vrurg>;
|
|||
use DB::Post;
|
||||
|
||||
#| A plain markdown post
|
||||
unit class MarkdownPost does Post is json;
|
||||
unit class MarkdownPost does Post is json(:pretty);
|
||||
|
||||
#| Marker for disambiguation between post types in json representation, the
|
||||
#| cheaty way
|
||||
|
|
|
@ -6,7 +6,7 @@ use JSON::Class:auth<zef:vrurg>;
|
|||
use DB::Post;
|
||||
|
||||
#| An empty placeholder post
|
||||
unit class PlaceholderPost does Post is json;
|
||||
unit class PlaceholderPost does Post is json(:pretty);
|
||||
|
||||
#| Marker for disambiguation between post types in json representation, the
|
||||
#| cheaty way
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue