X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FData%2FResult%2FContestStatus.pm;h=d4ed8fe4d07d7707de43f5c2f3226deb643ab5f6;hb=78c794d653161038dd4ef5986d7c7a5b96baff82;hp=dae7cbe523530fa5ae3f585e6568a8b8c0a21b21;hpb=adb42d4d148fdb3dd145e4a7452b7b7eda88f66c;p=gruntmaster-data.git diff --git a/lib/Gruntmaster/Data/Result/ContestStatus.pm b/lib/Gruntmaster/Data/Result/ContestStatus.pm index dae7cbe..d4ed8fe 100644 --- a/lib/Gruntmaster/Data/Result/ContestStatus.pm +++ b/lib/Gruntmaster/Data/Result/ContestStatus.pm @@ -6,7 +6,7 @@ package Gruntmaster::Data::Result::ContestStatus; =head1 NAME -Gruntmaster::Data::Result::ContestStatus +Gruntmaster::Data::Result::ContestStatus - List of (contest, user, result) =cut @@ -105,9 +105,17 @@ __PACKAGE__->belongs_to( ); -# 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; +}; -# You can replace this text with custom code or comments, and it will be preserved on regeneration 1;