[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