X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FModel%2FDBIC%2FSchema.pm;h=6abd49a5230c6aa48f8b4cf21c681b0f132418a0;hb=f9fc703ef23fb411c1fa53bdf10c6534ba0e7d3b;hp=0db268b0e01725ddee097ca208f187efa3879964;hpb=2a5644e8ea19e2db4136eaf8e458030d596071c4;p=catagits%2FCatalyst-Model-DBIC-Schema.git

diff --git a/lib/Catalyst/Model/DBIC/Schema.pm b/lib/Catalyst/Model/DBIC/Schema.pm
index 0db268b..6abd49a 100644
--- a/lib/Catalyst/Model/DBIC/Schema.pm
+++ b/lib/Catalyst/Model/DBIC/Schema.pm
@@ -17,7 +17,7 @@ use Module::Runtime qw/use_module/;
 use Catalyst::Model::DBIC::Schema::Types
     qw/ConnectInfo SchemaClass Schema/;
 
-use MooseX::Types::Moose qw/Str/;
+use MooseX::Types::Moose qw/Str Bool/;
 use MooseX::Types::LoadableClass qw/LoadableClass/;
 
 =head1 NAME
@@ -308,7 +308,7 @@ Traits that come with the distribution:
 
 =head2 compose_namespaces
 
-This model calls L<DBIx::Class::Schema/compose_namespaces> by default to
+This model calls L<DBIx::Class::Schema/compose_namespace> by default to
 install classes into the model namespaces. You can turn that off by
 setting this attribute to false. Default is true.
 
@@ -436,9 +436,9 @@ has schema_class => (
     required => 1
 );
 
-has compose_namespaces => (is => 'ro', default => sub { 1 });
+has compose_namespaces => (is => 'ro', isa => Bool, default => 1 );
 
-has install_model_shortcuts => (is => 'ro', default => sub { 1 });
+has install_model_shortcuts => (is => 'ro', isa => Bool, default => 1 );
 
 has storage_type => (is => 'rw', isa => Str);