summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorOthmar Gsenger <otti@wirdorange.org>2011-02-02 16:53:09 +0000
committerOthmar Gsenger <otti@wirdorange.org>2011-02-02 16:53:09 +0000
commit6690b0c436d7b2b94c2e680b6eae6108debf9af6 (patch)
tree3a90ba003b7ccb06bce7af9a7b97f91aee0930df
parentadded download speed in kb (lahme leitung ;() (diff)
added support for browsing by category
-rwxr-xr-xmydl.pl13
1 files changed, 5 insertions, 8 deletions
diff --git a/mydl.pl b/mydl.pl
index d698b8a..c90a40c 100755
--- a/mydl.pl
+++ b/mydl.pl
@@ -17,19 +17,16 @@ print table({class=>'nohigh'},Tr(td({align=>'right'},['benutzter Speicherplatz &
print CGI::start_table();
print Tr(th([qw/Neu Kategorie Name Größe Löschen /]));
-my @downloads;
-if (param('only_me'))
-{
- @downloads = local::db::download->search(owner=>$user->get_id(),completed=>1,{ order_by => 'time DESC'});
-} else {
- @downloads = local::db::download->search(completed=>1,{ order_by => 'time DESC'});
-}
+my @downloads = local::db::download->search(
+ param('only_me') ? (owner=>$user->get_id()) : () ,
+ param('category') ? (category => param('category')) : (),
+ completed=>1,{ order_by => 'time DESC'});
foreach my $dl ( @downloads)
{
my $dl_remove;
$dl_remove = a({href=>'/cgi-bin/nzbget/remove.pl?id='.$dl->download_id},"löschen") if $dl->owner->owner_id == $user->get_id;
print Tr(td([ (local::db::seen->search(user=>$user->get_id(),download=>$dl->download_id))?'':'x',
- $dl->category->name,a({title=>$dl->description,href=>'/cgi-bin/nzbget/read.pl?id='.$dl->download_id},$dl->name),$dl->size.'MB',$dl_remove
+ a({href=>'mydl.pl?only_me='.param('only_me').'&category='.$dl->category->category_id},$dl->category->name),a({title=>$dl->description,href=>'/cgi-bin/nzbget/read.pl?id='.$dl->download_id},$dl->name),$dl->size.'MB',$dl_remove
]));
}