package Template::Lace::Components;
use Moo;
use UUID::Tiny;
use JSON::MaybeXS ();
has [qw(handlers component_info ordered_component_keys)] => (is=>'ro', required=>1);
around BUILDARGS => sub {
m
' value
}
}
sub setup_arrayrefdata_hander {
my ($class, $value) = @_;
my $ref = JSON::MaybeXS::decode_json($value);
my @array = map {
my $v = $_; $v =~s/^\$\.//;
$class->attr_value_ha
ray ];
};
}
sub setup_hashrefdata_hander {
my ($class, $value) = @_;
my $ref = JSON::MaybeXS::decode_json($value);
my %hash = map {
my $v = $ref->{$_};
$_ => $class->attr_value_handl