Class::DBI::Cascade::Delete - Delete related objects

Class-DBI documentation Contained in the Class-DBI distribution.

Index

Code Index:

NAME

Top

Class::DBI::Cascade::Delete - Delete related objects

DESCRIPTION

Top

This is a Cascading Delete strategy that will delete any related objects.

Class-DBI documentation Contained in the Class-DBI distribution. 
package Class::DBI::Cascade::Delete;


use strict;
use warnings;

use base 'Class::DBI::Cascade::None';

sub cascade {
	my ($self, $obj) = @_;
	$self->foreign_for($obj)->delete_all;
}

1;