# Do stuff with $self, like set default values.
return $self->next::method( @_ );
}
-
+
sub delete {
my $self = shift;
# Do stuff with $self.
return $self->next::method( @_ );
}
-Now, the order that a component is loaded is very important. Components
-that are loaded first are the first ones in the inheritance stack. So, if
-you override insert() but the DBIx::Class::Row component is loaded first
-then your insert() will never be called, since the DBIx::Class::Row insert()
-will be called first. If you are unsure as to why a given method is not
+Now, the order that a component is loaded is very important. Components
+that are loaded first are the first ones in the inheritance stack. So, if
+you override insert() but the DBIx::Class::Row component is loaded first
+then your insert() will never be called, since the DBIx::Class::Row insert()
+will be called first. If you are unsure as to why a given method is not
being called try printing out the Class::C3 inheritance stack.
print join ', ' => Class::C3::calculateMRO('YourClass::Name');
=head2 Extra
-These components provide extra functionality beyond
+These components provide extra functionality beyond
basic functionality that you can't live without.
L<DBIx::Class::Serialize::Storable> - Hooks for Storable freeze/thaw.
L<DBIx::Class::RandomStringColumns> - Declare virtual columns that return random strings.
-L<DBIx::Class::UTF8Columns> - Force UTF8 (Unicode) flag on columns.
-
L<DBIx::Class::UUIDColumns> - Implicit UUID columns.
L<DBIx::Class::WebForm> - CRUD methods.