Skip to content

Commit

Permalink
get rid of Moose dependency
Browse files Browse the repository at this point in the history
  • Loading branch information
moritz committed May 10, 2011
1 parent 0114be2 commit d59ea18
Showing 1 changed file with 8 additions and 16 deletions.
24 changes: 8 additions & 16 deletions t/tlib/TestTree.pm
@@ -1,19 +1,16 @@
package TestTree; package TestTree;
#
# $Id: $
# $Revision: $
# $Author: $
# $Source: $
#
# $Log: $
#
use Moose;
#use Data::Dumper;
use Test::More; use Test::More;


use namespace::clean; use namespace::clean;


has 'schema' => (is => 'rw'); # Schema connection sub new {
my ($class, $args) = @_;
use Data::Dumper;
bless { schema => $args->{schema} }, $class;
}

sub schema { shift->{schema} };


sub structure { sub structure {
my ($self, $root, $test_str) = @_; my ($self, $root, $test_str) = @_;
Expand Down Expand Up @@ -46,9 +43,4 @@ sub structure {
} }
} }



# This speeds up the code and must be at the end of the package
no Moose;
__PACKAGE__->meta->make_immutable;

1; 1;

0 comments on commit d59ea18

Please sign in to comment.