Red.git | examples/blog2/ | Post.rakumod
use Red;
model Post is rw {
has Int $.id is serial;
has Int $!author-id is referencing( *.id, :model<Person> );
has Str $.title is unique;
has Str $.body is column;
has $.author is relationship( *.author-id, :model<Person>);
has Bool $.deleted is column = False;
has DateTime $.created is column .= now;
has Set $.tags is column{
:type<string>,
:deflate{ .keys.join: "," },
:inflate{ set(.split: ",") }
} = set();
method delete { $!deleted = True; self.^save }
}