diff options
Diffstat (limited to 'nzbget/remove.pm')
| -rw-r--r-- | nzbget/remove.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/nzbget/remove.pm b/nzbget/remove.pm index 71334bd..4291a2b 100644 --- a/nzbget/remove.pm +++ b/nzbget/remove.pm @@ -15,12 +15,12 @@ sub handler my $del_id = param('id'); my ($dl) = local::db::download->retrieve($del_id) or die 'Error in cancel'; - die "Not allowed" if not $dl->owner->owner_id() eq $user->get_id(); - + die "Not allowed" if not ($dl->owner->owner_id() eq $user->get_id() or $user->is_admin() ); + my $owner = $dl->owner; my $basedir = $config::config{files_dir} or die 'Missing files_dir in config'; File::Path::rmtree($basedir.'/'.$dl->category->name.'/'.$dl->download_id); - $user->obj->quota_used($user->obj->quota_used - $dl->size); - $user->obj->update; + $owner->quota_used($owner->quota_used - $dl->size); + $owner->update; my @seens = local::db::seen->search(download=>$del_id); map {$_->delete()} @seens; $dl->delete(); |