Also check if file has pod_lines to determine best link

refs #1105.
metacpan · Feb 15, 2014 · 77988a4 · 77988a4
1 parent bfbe8ed
commit 77988a4
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/lib/MetaCPAN/Web/Model/API/Module.pm b/lib/MetaCPAN/Web/Model/API/Module.pm
@@ -371,6 +371,7 @@ sub search {
                 distribution
                 date
                 id
+                pod_lines
             )],
         }
     );

diff --git a/root/preprocess.html b/root/preprocess.html
@@ -58,7 +58,7 @@
   MACRO link_to_file(file, linktext) BLOCK;
     title = file.documentation || file.path;
     # If there is pod for this file...
-    IF file.documentation || file.module.grep(->(module){ module.associated_pod }).size;
+    IF file.documentation || file.pod_lines.size || file.module.grep(->(module){ module.associated_pod }).size;
       IF file.status == "latest";
         # If it's a PAUSE-indexed module (02packages)...
         IF file.documentation