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	dpavlin	573	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	dpavlin	676
18			$self->skeleton;
19	dpavlin	573	}
20
21			1;