fix bug in boolean logic leading to misleading error message
Jonathan Rockway [Wed, 29 Apr 2009 15:09:06 +0000 (10:09 -0500)]
lib/MooseX/Runnable/Invocation.pm

index 16db55b..78108c0 100644 (file)
@@ -87,12 +87,11 @@ sub _convert_role_to_scheme {
     };
 }
 
-
 sub validate_class {
     my ($self, $class) = @_;
 
     my @bad_attributes = map { $_->name } grep {
-        $_->is_required && $_->has_default || $_->has_builder
+        $_->is_required && !($_->has_default || $_->has_builder)
     } $class->get_all_attributes;
 
     confess