X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSchema%2FLoader.pm;fp=lib%2FDBIx%2FClass%2FSchema%2FLoader.pm;h=97050bce7ab1779c79cb840e42d5ba871dc7114d;hb=f3bed1f1082ac865772d577252a7c80af4504d4c;hp=d100408d790d206bb4ba6009a554887599449e0b;hpb=b97f3990a6d984919bfb19ad70b1b660f8812cb5;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/lib/DBIx/Class/Schema/Loader.pm b/lib/DBIx/Class/Schema/Loader.pm index d100408..97050bc 100644 --- a/lib/DBIx/Class/Schema/Loader.pm +++ b/lib/DBIx/Class/Schema/Loader.pm @@ -11,6 +11,7 @@ use Sub::Util 'set_subname'; use DBIx::Class::Schema::Loader::Utils 'array_eq'; use Try::Tiny; use Hash::Merge 'merge'; +use curry; use namespace::clean; # Always remember to do all digits for the version even if they're 0 @@ -460,11 +461,11 @@ sub import { } elsif($opt eq 'naming') { no strict 'refs'; - *{"${cpkg}::naming"} = sub { $self->naming(@_) }; + *{"${cpkg}::naming"} = $self->curry::naming; } elsif($opt eq 'use_namespaces') { no strict 'refs'; - *{"${cpkg}::use_namespaces"} = sub { $self->use_namespaces(@_) }; + *{"${cpkg}::use_namespaces"} = $self->curry::use_namespaces, } } }