21 lines
298 B
Perl
21 lines
298 B
Perl
package CW::Layout;
|
|
|
|
use Moo;
|
|
use Types::Standard qw(HashRef InstanceOf);
|
|
|
|
has template => (
|
|
is => 'ro',
|
|
required => 1,
|
|
isa => sub {
|
|
ref($_) && ref($_) =~ /^CW::Template/;
|
|
}
|
|
);
|
|
|
|
has ctx => (
|
|
is => 'ro',
|
|
required => 1,
|
|
isa => HashRef
|
|
);
|
|
|
|
1;
|