Fix purge

[gruntmaster-daemon.git] / lib / Gruntmaster / Daemon.pm

diff --git a/lib/Gruntmaster/Daemon.pm b/lib/Gruntmaster/Daemon.pm
index d97305b0e8e7ec5c703498dc0bd757b6326f0d82..35103a5e57dcf7e25ff5b2f7bff496b64f22df95 100644 (file)
--- a/lib/Gruntmaster/Daemon.pm
+++ b/lib/Gruntmaster/Daemon.pm
@@ -44,6 +44,7 @@ sub safe_can {
 }
 
 sub purge {
+       get_logger->trace("Purging $_[0]");
        for my $host (@purge_hosts) {
                my $req = HTTP::Request->new(PURGE => "http://$host$_[0]");
                $ua->request($req)
@@ -128,7 +129,7 @@ sub process{
                $errors ? (errors => $errors) : ()
        });
 
-       my $log = $jobr->contest ? 'ct/' . $jobr->contest . '/log' : 'log';
+       my $log = $jobr->contest ? 'ct/' . $jobr->contest->id . '/log' : 'log';
        my $page = ($job + PAGE_SIZE - 1) / PAGE_SIZE;
 
        purge "/$log/$job";