use Khonsu;
Khonsu->load_plugin(qw/+Syntax/);
my $k = Khonsu->new('test', page_args => {padding => 20});
my $test = q|package Test::Package;
use Moo;
has one => (
is => 'rw',
other => sub { ... }
);
sub two {
my ($self, %attributes) = @_;
my $one = $self->one();
return $one;
}
1;|;
$k->add_syntax(
text => $test,
y => 20,
);
my $json = q|{
"one": 1,
"two": 2,
"three": 3,
"four": 4
}|;
$k->add_syntax(
syntax => 'JSON',
line_numbers => 1,
text => $json
);
$k->save();
ok(1);
done_testing();