diff --git a/db/Experiment.pm.in b/db/Experiment.pm.in index e36d71df59fe5b8c1da0421a9939f0cec070a913..96c6c2371ef056a841141bc1af996da42e2d300b 100644 --- a/db/Experiment.pm.in +++ b/db/Experiment.pm.in @@ -2842,6 +2842,13 @@ sub CleanLogFiles($) mysystem("/bin/rm -f @delete") == 0 or return -1; + # + # Whenever we clean the log files, we might as well clear the + # current log file, cause it no longer is there, but the web + # interface will not know that. + # + $self->ClearLogFile(); + return 0; }