=head1 NAME
-Gruntmaster::Data::Result::ContestStatus
+Gruntmaster::Data::Result::ContestStatus - List of (contest, user, result)
=cut
);
-# Created by DBIx::Class::Schema::Loader v0.07042 @ 2014-12-11 23:51:27
-# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:vfOfZeATPRODifpgHO4L0A
+# Created by DBIx::Class::Schema::Loader v0.07042 @ 2014-12-19 16:44:22
+# DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:IkY4FNON0SrxrP8oNOXoHg
+
+use Class::Method::Modifiers qw/after/;
sub rawowner { shift->get_column('owner') }
+after qw/insert update delete/ => sub {
+ my ($self) = @_;
+ Gruntmaster::Data::purge '/us/';
+ Gruntmaster::Data::purge '/us/' . $self->rawowner;
+};
+
1;