lib/Frey/Skeleton.pm

package Frey::Skeleton;
use Moose;

extends 'Frey';
with 'Frey::Web';
#with 'Frey::Storage';

has skeleton => (
        is => 'rw',
        isa => 'Str',
        required => 1,
        default => 'skeleton',
);

sub as_markup {
        my ($self) = @_;

        $self->skeleton;
}

1;
1	package Frey::Skeleton;
2	use Moose;
3
4	extends 'Frey';
5	with 'Frey::Web';
6	#with 'Frey::Storage';
7
8	has skeleton => (
9	is => 'rw',
10	isa => 'Str',
11	required => 1,
12	default => 'skeleton',
13	);
14
15	sub as_markup {
16	my ($self) = @_;
17
18	$self->skeleton;
19	}
20
21	1;