From 4cecda2089b57842b54f40deb2145e1a3e06ec3a Mon Sep 17 00:00:00 2001
From: Othmar Gsenger <otti@wirdorange.org>
Date: Sat, 15 Jan 2011 05:21:19 +0000
Subject: added completed mark

---
 cancel.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'cancel.pl')

diff --git a/cancel.pl b/cancel.pl
index c3b7573..6e3bc78 100755
--- a/cancel.pl
+++ b/cancel.pl
@@ -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();
   }
 }
-- 
cgit v1.2.3