Stuff removal from root/ finished

diff --git a/share/root/compclass.tt b/share/root/compclass.tt
deleted file mode 100644 (file)
index 3b0da27..0000000
--- a/share/root/compclass.tt
+++ /dev/null
@@ -1,42 +0,0 @@
-package [% class %];
-
-use strict;
-use warnings;
-use parent 'Catalyst::[% long_type %]';
-
-=head1 NAME
-
-[% class %] - Catalyst [% long_type %]
-
-=head1 DESCRIPTION
-
-Catalyst [% long_type %].
-[% IF long_type == 'Controller' %]
-=head1 METHODS
-
-=cut
-
-
-=head2 index
-
-=cut
-
-sub index :Path :Args(0) {
-    my ( $self, $c ) = @_;
-
-    $c->response->body('Matched [% class %] in [%name%].');
-}
-
-[% END %]
-=head1 AUTHOR
-
-[%author%]
-
-=head1 LICENSE
-
-This library is free software. You can redistribute it and/or modify
-it under the same terms as Perl itself.
-
-=cut
-
-1;

diff --git a/share/root/comptest.tt b/share/root/comptest.tt
deleted file mode 100644 (file)
index dd2c5e6..0000000
--- a/share/root/comptest.tt
+++ /dev/null
@@ -1,23 +0,0 @@
-use strict;
-use warnings;
-[% IF long_type == 'Controller' %][% IF mech %]use Test::More;
-
-eval "use Test::WWW::Mechanize::Catalyst '[% app %]'";
-plan $@
-    ? ( skip_all => 'Test::WWW::Mechanize::Catalyst required' )
-    : ( tests => 2 );
-
-ok( my $mech = Test::WWW::Mechanize::Catalyst->new, 'Created mech object' );
-
-$mech->get_ok( 'http://localhost[% uri %]' );
-[% ELSE %]use Test::More tests => 3;
-
-BEGIN { use_ok 'Catalyst::Test', '[% app %]' }
-BEGIN { use_ok '[% class %]' }
-
-ok( request('[% uri %]')->is_success, 'Request should succeed' );
-[% END %]
-[% ELSE %]use Test::More tests => 1;
-
-BEGIN { use_ok '[% class %]' }
-[% END %]