$self->{scriptgen} = $Catalyst::CATALYST_SCRIPT_GEN;
$self->{author} = $self->{author} = $ENV{'AUTHOR'}
|| eval { @{ [ getpwuid($<) ] }[6] }
- || 'A clever guy';
+ || 'Catalyst developer';
$self->_mk_dirs;
$self->_mk_appclass;
$self->_mk_build;
=head1 METHODS
-=over4
+=over 4
=item default
$c->res->output('Congratulations, [% name %] is on Catalyst!');
}
+=back
+
=head1 AUTHOR
[%author%]
=head1 NAME
-[% class %] - A Component
+[% class %] - Catalyst component
=head1 SYNOPSIS
[% IF type == 'C' %]
=head1 METHODS
-=over4
+=over 4
=item default
my ( $self, $c ) = @_;
$c->res->output('Congratulations, [% class %] is on Catalyst!');
}
+
+=back
[% END %]
=head1 AUTHOR