bugfix cancel

1 files changed, 1 insertions, 1 deletions

diff --git a/cancel.pl b/cancel.pl
index 6ba7918..7b8546c 100755
--- a/cancel.pl
+++ b/cancel.pl
@@ -23,7 +23,7 @@ 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($basedir'/'.$dl->category->name.'/'.$dl->download_id);
+    remove_tree($basedir.'/'.$dl->category->name.'/'.$dl->download_id);
     $user->obj->quota_used($user->obj->quota_used - $dl->size);
     $user->obj->update;
     my @seens = local::db::seen->search(download=>$del_id);