X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FRelationship%2FCascadeActions.pm;fp=lib%2FDBIx%2FClass%2FRelationship%2FCascadeActions.pm;h=e5afd352701844ccb4f23220b0a13a4b15e560a1;hb=65d08642518d29e1a0fa5a426a559558ec82a1a9;hp=3d5da76390ae59cba06a988b4a5c42bae5c6216a;hpb=81164696114197530f935b5198b04310e041c286;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Relationship/CascadeActions.pm b/lib/DBIx/Class/Relationship/CascadeActions.pm index 3d5da76..e5afd35 100644 --- a/lib/DBIx/Class/Relationship/CascadeActions.pm +++ b/lib/DBIx/Class/Relationship/CascadeActions.pm @@ -4,6 +4,11 @@ package # hide from PAUSE use strict; use warnings; +our %_pod_inherit_config = + ( + class_map => { 'DBIx::Class::Relationship::CascadeActions' => 'DBIx::Class::Relationship' } + ); + sub delete { my ($self, @rest) = @_; return $self->next::method(@rest) unless ref $self;