X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FGruntmaster%2FData%2FResult%2FJob.pm;h=39d44bd81716ab02d910dceecfed6f6f9941ec84;hb=78c794d653161038dd4ef5986d7c7a5b96baff82;hp=dfb375e7a0a0e40786a65b4213595b3349c1bf96;hpb=be2f7678d7b65c497fe9d65b74b1b5bb4a47b496;p=gruntmaster-data.git

diff --git a/lib/Gruntmaster/Data/Result/Job.pm b/lib/Gruntmaster/Data/Result/Job.pm
index dfb375e..39d44bd 100644
--- a/lib/Gruntmaster/Data/Result/Job.pm
+++ b/lib/Gruntmaster/Data/Result/Job.pm
@@ -236,6 +236,8 @@ __PACKAGE__->has_many(
 # Created by DBIx::Class::Schema::Loader v0.07042 @ 2014-12-19 16:54:00
 # DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:hEAVL5heV13+nalSmgr0WA
 
+use Class::Method::Modifiers qw/after/;
+
 sub rawcontest { shift->get_column('contest') }
 sub rawowner { shift->get_column('owner') }
 sub rawproblem { shift->get_column('problem') }
@@ -244,6 +246,15 @@ sub rerun {
 	shift->update({daemon => undef, result => -2, result_text => undef});
 }
 
+after qw/insert update delete/ => sub {
+	my ($self) = @_;
+	Gruntmaster::Data::purge '/us/';
+	Gruntmaster::Data::purge '/us/' . $self->rawowner;
+	Gruntmaster::Data::purge '/st/' . $self->rawcontest if $self->rawcontest;
+	Gruntmaster::Data::purge '/log/';
+	Gruntmaster::Data::purge '/log/' . $self->id;
+};
+
 1;
 
 __END__