}
-sub find_method_by_name{
+sub find_method_by_name {
my($self, $method_name) = @_;
defined($method_name)
or $self->throw_error('You must define a method name to find');
sub find_attribute_by_name {
my($self, $name) = @_;
+ defined($name)
+ or $self->throw_error('You must define an attribute name to find');
foreach my $attr($self->get_all_attributes) {
return $attr if $attr->name eq $name;
}