/module/DB is pointing to Locale::Maketext::Utils, fixes #194

metacpan · Apr 10, 2012 · 2fbc3f7 · 2fbc3f7
1 parent c7f9f2b
commit 2fbc3f7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/MetaCPAN/Document/File.pm b/lib/MetaCPAN/Document/File.pm
@@ -577,12 +577,12 @@ sub find {
             'mime',
             { 'stat.mtime' => { order => 'desc' } }
         ]
-        )->all;
+        )->size(100)->all;
 
     my ($file) = grep {
         grep { $_->indexed && $_->authorized && $_->name eq $module }
             @{ $_->module || [] }
-    } @candidates;
+    } grep { !$_->documentation || $_->documentation eq $module } @candidates;
 
     # REINDEX: after a full reindex, the rest of the sub can be replaced with
     # return $file ? $file : shift @candidates;