diff options
Diffstat (limited to 'cancel.pl')
-rwxr-xr-x | cancel.pl | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -23,7 +23,9 @@ foreach my $value ( @$row) { my $status = $cli->send_request('editqueue','GroupDelete',0,"",[$value->{LastID}->value]) or die "Can't connect to nzbget"; sleep 1; - remove_tree('/srv/nzbget/done/'.$dl->category->name.'/'.$dl->download_id + remove_tree('/srv/nzbget/done/'.$dl->category->name.'/'.$dl->download_id); + $user->obj->quota_used($user->obj->quota_used - $dl->size); + $user->obj->update; $dl->delete(); } } |