Parent Directory | Revision Log
make classes immutable and remove moose droppings to make Perl::Critic::Moose happy
1 | package Frey::Skeleton; |
2 | use Moose; |
3 | |
4 | extends 'Frey'; |
5 | with 'Frey::Web'; #, 'Frey::Storage'; |
6 | |
7 | has skeleton => ( |
8 | is => 'rw', |
9 | isa => 'Str', |
10 | required => 1, |
11 | default => 'skeleton', |
12 | ); |
13 | |
14 | sub as_markup { |
15 | my ($self) = @_; |
16 | |
17 | $self->skeleton; |
18 | } |
19 | |
20 | __PACKAGE__->meta->make_immutable; |
21 | no Moose; |
22 | |
23 | 1; |
ViewVC Help | |
Powered by ViewVC 1.1.26 |