[Cpan-forum-commit] rev 272 - in trunk: . lib/CPAN/Forum/RM
svn at pti.co.il
svn at pti.co.il
Fri Jul 20 17:45:11 EEST 2007
Author: gabor
Date: 2007-07-20 17:45:11 +0300 (Fri, 20 Jul 2007)
New Revision: 272
Modified:
trunk/
trunk/lib/CPAN/Forum/RM/Author.pm
Log:
stop trying to query posts for author that has no modules
Property changes on: trunk
___________________________________________________________________
Name: svk:merge
- 7bc34947-122d-0410-bc5a-f898d2bb5f81:/local/cpan-forum:4257
8c4c90e1-83eb-0310-96eb-e7cb62807872:/local/cpan-forum:12752
+ 7bc34947-122d-0410-bc5a-f898d2bb5f81:/local/cpan-forum:4258
8c4c90e1-83eb-0310-96eb-e7cb62807872:/local/cpan-forum:12752
Modified: trunk/lib/CPAN/Forum/RM/Author.pm
===================================================================
--- trunk/lib/CPAN/Forum/RM/Author.pm 2007-07-20 14:44:59 UTC (rev 271)
+++ trunk/lib/CPAN/Forum/RM/Author.pm 2007-07-20 14:45:11 UTC (rev 272)
@@ -4,8 +4,10 @@
=head2 author
-List posts by module author (PAUSEID)
+List posts to dists grouped by author of the dists (PAUSEID)
+/author/XYZ
+
=cut
sub author {
@@ -36,7 +38,9 @@
CPAN::Forum::DB::Groups->search( pauseid => $author->{id} );
$self->log->debug("Group IDs: @group_ids");
my $page = $q->param('page') || 1;
- $self->_search_results($t, {where => {gid => \@group_ids}, page => $page});
+ if (@group_ids) {
+ $self->_search_results($t, {where => {gid => \@group_ids}, page => $page});
+ }
#$self->_subscriptions($t, $gr);
$t->output;
}
More information about the Cpan-forum-commit
mailing list