Purge /sol/ :problem when a problem is updated

diff --git a/lib/Gruntmaster/Data/Result/Problem.pm b/lib/Gruntmaster/Data/Result/Problem.pm
index fe5523d62ced72ae2b9fa3316a63244eeffdacfe..6b9b3bfff02ae3156c9332d5aa4cd0c35ed00641 100644 (file)
--- a/lib/Gruntmaster/Data/Result/Problem.pm
+++ b/lib/Gruntmaster/Data/Result/Problem.pm
@@ -320,6 +320,7 @@ after qw/insert update delete/ => sub {
        my ($self) = @_;
        Gruntmaster::Data::purge '/pb/';
        Gruntmaster::Data::purge '/pb/' . $self->id;
+       Gruntmaster::Data::purge '/sol/' . $self->id;
 };
 
 sub is_private {